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Use the Brains your Commodore 
wasn't born aa^tr 



Right at your fingertips 
in CompuServe's 
Commodore* Forums. 

Our Commodore Forums involve 
thousands of Commodore users 
worldvk'ide. These forums show you 
just how easy it is to get the most 
from your Commodore computer. 

The Commodore Arts and Games 
Forum is for al! Commodore 8-bit 
computers, concentrating on music, 
graphics, and games. The Commo- 
dore Communications Forum has 
updates of communications soft- 
ware. The Commodore Programming 
Forum supports programmers and 
developers of Commodore 8-bit 
computers. And the Amiga" Forum 
serves as the national resource 
for all business and entertain- 
ment applications in the Amiga 
community 



Easy access to free software, 
including free uploads. 

You can easily download first-rate, 
non-commercial software and utility 
programs. Upload your own pro- 
grams free of connect time charges. 
And take advantage of CompuServe's 
inexpensive weeknight and weekend 
rates, when forums are most active 
and standard online charges are 
just IOC a minute. You can go online 
in most areas with a local phone call. 
Plus, you'll receive a $25.00 
Introductory Usage Credit when 
you purchase your CompuServe 
Subscription Kit. 



Data Libraries for non-commercial 
software. Enjoy other useful 
services too, like electronic editions 
of popular computer magazines. 

All you need is your Commodore 
computer (or almost any other per- 
sonal computer) and a modem. 

To buy your Subscription Kit, 
see your nearest computer dealer. 
Suggested retail price is $39.95, 
To receive our free brochure, or to 
order direct, call 800-848-8199 (in 
Ohio and Canada, call 614-457-0802). 
If you're already a CompuServe sub- 
scriber, type GO CBMNET (Commo- 
dore Users Network) at any ! prompt 
to see what you've been missing. 



Information you just can't find 
Euiywhere else. 

Use the Forum Message Board to COmpUSGrVG 

exchange mail with fellow members. 
Join ongoing, real-time discussions in 
a Forum Conference or communicate 
with industry experts. Scan Forum An HiR bum* company 

Reader Service No )3S 



InlormaliOT Services, fiO. Box 20212 

5000 Arlington Conire Blvd.. Colurtibus. Ohio 43220 

800-848-8199 

In Ohio, call 614-457-0802 
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Since 1981 



Lyco Computer 

Marketing & Consultants 



TO ORDER 
CALL TOLL FREE 
1-800-233-8760 

in PA I'miiffiViiij 

(717)494-1030 JIlP: 

or send to , ^^^_ 

Lyco Computer m&t 

iP.O. Box 5088 ^"i™^ 

Jersey Shore, PA 17740 

CUSTOMER SERVICE 

(717)494-1670 

Men. - Fri, 9AM - 5PM 



RISK FREE POLICY 

In-stock Items shipped within 24 
hrs. of order. No deposit on COD. 
orders. Free shipping on prepaid 
cash orders within the continental 
U.S. Volume discounts available 
PA residents add sales tax. APO. 
FPO and international orders add 
S5.00 plus 3% for priority mail. Ad- 
vertised prices show 4% discount 
(or cash, add 4% foi Master Card 
and VISA. Personal checks require 
4 weeks clearance before shipping. 
We cannot guarantee compatibility. 
We only shipfactory fresh merchan- 
dise. Ask about UPS Blue and red 
label shipping. All merchandise car- 
ried under manufacturer'swarrant^. 
Return restriction applicable. Return 
authorization required. All items sub- 
ject to change without notice. 
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• Commodore 64c 
Computer (^ >| QO 

• 1 54 1C Drive M>'+<^<^ 

• 1802 Monitor 
{BODAV WARRANTY) 
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Titanic 
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Hacker 
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Holiday paper 
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Kennedy Approach 
SilenI Sen/ice 
Solo Fligftl 
Top Gunner 
Conflict in Nam 
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WE STOCK OVER 5000 SOFTWARE TITLES! 
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$659 with Monitor 

(ChoiCP ot qreen or amberi 

• 512 RAM 

• 360K Drive 

■■'■' 100% 
IBM 

CorPDatible 

CALL FOR PACKAGE SPECIALS 



SPECIAL! 

IBM COMPATIBLE 

commoaore 

PERSONAL COMPUTERS 




£0 £II^^^ECC^CC^^^OT\ ■BKa 
COMMOIK>RE COMMODORE 

[FC»"ll«99(FC»i$W 

FULL MANUrACTURERS WARRANTY' 



1-800-233-8760 
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• 120 cps Draft Mode 

• 24 cps NLQ S 1 7 Q 

• Friction Feed >* I f v 
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Lyco Computer is one of the oldest and most 
established computer suppliers in America. 
Because we are dedicated to satisfying every 
customer, we have earned our reputation as 
the best in the business. And, our six years of 
experience In computer marketing Is your 
assurance of knowledgeable service and 
quality merchandise. 
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INTERFACING 
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G-WrZ S39 95 

Super G Sa9 95 
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$129 
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• 100 cps Draft Mode 

• 25 cps NLQ 

• Standard Parallel Interface 

• 1-year Warranty 



EPSON 

LX86... SCALL 

EX-BOO 5389 

EX.1000 S519 

LO-800 S459 

LQ-1000 S649 

FXZSSe S459 

FX.86e S329 

CITIZEN 

120-D .$179 

MSP-10 S2B5 

MSP-IS S385 

MSP-20 S325 

MSP-25 5485 

Premier 35 5469 

Tribule 224 5649 

OKIDATA 

Okimaie 20 S129 

Plug n Prrnl SCALL 

120 NLO 5209 

182 S245 

192* 5365 

193* 5559 

292 w/ inlerTace $539 

293 w ^nleriace S679 

TOSHIBA 

321 P^S S479 

35T srieei leeds' 5529 

341E S6S9 

P351 model 2 SI 099 



STAR MICRONICS 

NX-10 $195 

NX-IOC S199 

NLIO S?09 

Sft-tO S399 

SO-10.. S249 

NB15 S739 

ND-15 S425 

NX-15 S329 

NR-15 S499 

NB24.15 SP29 

NB24.10 S419 

NiJlO S329 

SILVER REED 

EXP J?aP S209 

EXP600P S533 

EXP 800 P S649 

LEGEND 

808 S179 

1080 S199 

1380 S229 

1385 S289 

DIABLO 

D25 $499 

635 $779 

D-eOIF . . S1029 

SEIKOSHA 

SP1200 AS $195 

SP-1200 Al. $195 

BP-5420 $1075 

MP-5300 Al S549 

Color Kil $119 

MP-1300AI $369 

SL-80 Al S375 

SP-I80 VC $145 

SP-180 Al S145 
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MAXELL 

SSDD 

DSDD 

BONUS 

SSDD 

DSDO 

SKC 

SSDD 
DSDD 
DSHD 

VERBATIM 

SSDD 
DSDD 



S'i 3.5 

S12 99 S23 99 



56 99 

57 50 



Se 50 $1499 
S9 50 Sie 99 

S1699 - 



S9 99 Sie 99 
S1299 S24 99 



Call lor generic diskette pricing' 



SEIKOSHA 
SP-1000VC 




Guaranteed Lowest Price! 
100 ops Draft Mode 
20 cps NLQ 

Djrect Connect C-64/128 
2-year Warranty 



DRIVES 

INDUS 

GT|C64i 

BLUE CHIP 

5 25 Drive IC64I 
1 28 Drive 

MODEMS 

OSI 



Si 79 



MONITORS 

TEKNIKA 



S149 

S199 



MJ-305 
I^J-503 



AVATEX 



Messenger 

1200 " S8395 

I ZOO he S93 95 • with cable 
purchase 



ZENITH 

ZVM 1220 Amber 
$34,95 ZVM i?30Gr.v" 



THOMSON 

4120 RGB Composite 



S309 
5529 



S89 
SB9 



S249 



commociore 

PACKAGE^' '^^ ,-^ 

• Commodore C- 1 28 Computer - J:!^' '^^ 

• 1571 Disk Drive ""~~^ 

• Thomson 4120 Monitor Full warranty applies. 




commodore 

HARDWARE 



CI 28 Computer ... $249 

1571 Drive $229 

1902 Monitor S285 

64C Computer $175 

1 5410 Drive $185 



1802 Monitor $185 

CI 700 RAM S109 

CI 750 RAM SI 69 

CI 351 Mouse $39 

1670 Modem call 



HOURS 

Men - Thurs 9AM-8PM 

Fri 9AM-6PM 

Sat10AM-6PM 
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Take a Quiet Drive 
in tlie Fast Lane. 
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Introducing the New 

FSD-2 

Excelerator+Plus 

Commodore Compatible Disk Drive 

Faster, quieter and more reliable than the 1541 and 1541C. 

Breakthrough Direct Drive technology. 

Guaranteed 100% Compatibility. It even enhances GEOS! 

Full One-Year Warranty. 

Distributed by: Rrel America Distributing, tnc. 
Palmer Lake Plaza BIdg. 
6860 Shingte Creek Parkway 
Brooklyn Center, MINN. 55430 

Manufactured by: K^^T Emerald ComponanIS International 541 Willarr\Btle Eugene. OR S7401 Fax:503-345-5037 Telex: 23-499-6100 EUG SECSVC 

Ruder Service Na. 134 
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e're probably the only magazine in Nortii 
America that hasn't featured Vanna White 
on its cover. While this situation is not 
likely to be remedied soon, we do have 
good news for fans of that talented letter-turner- as well 
as for longtime readers who constantly ask, whatever hap- 
pened to Bob Lloret? 

The author of Posl Time, Space Patml, and others among 
the most popular programs of our early issues graces the 
reverse side of diis month's Alioy! Disk with Fortune Wljeel. 
This is the most realistic simulation we've seen of the TV 
show of almost the same name -right down to the dumb 
blonde! (Er— we meant, Vanna lovers, that she doesn't say 
much on the show.) If you don't get the Ahoy! Disl(, see 
the ad on page 30. 

But for our S2.95, the most exciting news this month 
is right between these covers: 

•Tony Brantner's Steeplechase and James C. Hilty's Bat- 
ter Up! offer the kind of graphics we consider ourselves 
fortunate to be able to present to you once per issue. Both 
are included in this issue. We won't say another word- 
the screen shots we've printed say everything! (Turn to 
pages 15 and 31.) 

•We know how you hate to type. So before we publish 
a program that's over five pages in length, we ask ourselves: 
is this going to be worth it? And in 
the case of Cieve Blakemore's extend- 
ed efforts, the answer is usually yes. 
It certainly is in the case of Archer, 
a multilevel tribute to the arcade mi- 
lestone called Venture. CRim to page 
60.) 

•We've run the gamut with banner 
generators for the 64, from Bob 
Spirko's mammoth Streamer Font (Jan. 
'86) to Curtis Kaylor's 18-line Banner 
(March '86). Now Banner Prim by 
Mike Hoyt lets people who like to 
print sideways take advantage of the 
Commodore 128's special features, 
(Turn to page 22.) 

• Because we strive to be to program- 
ming what the Mobil Guide is to trav- 
eling. Roi4te 64 seemed like an appro- 
priate title for Buck Childress' latest 
utility. It facilitates line referencing by 
replacing calls to line numbers with 
labels. (Turn to page 13.) 

• Encouraged by the fact that no read- 
ers called in to report fatal electrocu- 
tions sustained from the hardware con- 
struction detailed in last month's 
Rupert Report, Dale has gone ahead 
with an even more ambitious project. 
This issue's Green Screen Blues will 
allow C-128 users to set up an elec- 
tronic relay for switching a video mon- 



itor from 40 to 80 column mode. (Turn to page 32.) 
•While it doesn't incorporate the assembly/disassembly 
capabilities of full-blown machine language monitors. 
Scanner v/'di allow you to view the contents of any memory 
location in binary, hex. and ASCII. (Turn to page 25.) 
•Because science fiction themes account for such a large 
segment of the computer game arena. Arnie Katz and Bill 
Kunkel couldn't cover all the current otherworldly enter- 
tainment in a single article. In June they surveyed sci-fi 
strategy games; this month they provide Action in Outer 
Space, reviewing Uridium, Parallax, and Starglider. (Turn 
to page 41.) 

•If you shun our COMAL Column because you have no 
interest in learning the language, you're making a mistake. 
Not just because of COMAL's many strong points, but be- 
cause Richard Herring manages each month to teach as 
much about programming languages in general as he does 
about COMAL in particular. This month he makes a case 
for Tl\e Death of GOTO. (Turn to page 69.) 

Sharp-eyed readers will have noted a slight change in 
the address we print at various places around the 
magazine— from Suite 407 to Suite 500. Please use the cor- 
rect suite number when you write. And when you're in 
New York, please stop in (as many of you do). We'd love 
to meet you— and show off our new office! —David Allikas 



Super Graphix 




Includes: 

Utility Disk 

With 

27 Fonts 

And 

Font 

Creator 



GRAPHICS and FONTS plus an 8K BUFFER (or the ultimate In performance and 
speed. The XETEC Super Graphix interface for Commodore Computers now 
offers a new high in technology with these features: 

• 8K Buffer Standard • Capable of Storing 2 Additional Fonts 

• 10 Printing Modes • Correct Graphics/Text Aspect Ratio for 

• 3 Internal Screen Dumps all Major Printers 

• Extensive Command Channel ' ^ Active Switches with Changes 

• Reset Button to Halt Printing Constantly f^onitored 
from Buffer * In'^fial Fonts Support Super-script, 

. e,..i.„K o.tii.^. 1 .K..! .-. SutJ-scrlpt, Underlining, Bold-face and 

• Switch Settings on Label (or cholre of q Pitrhe^ 
Quick Reference ^"°"=^ °' ^ Pitches 

• Correspondence Quality Font Bulll-ln 

Suggested /jsf $99.95 • Includes Lifetime Warranty 
X^ISG, Inc. / 2804 Arnold Rd. / Salina, KS 67401 / 913-827-0685 
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CCUTTLISBUTT 



PORTABLE MODEM • MUSIC APPRECIATION DISKS • ENHANCED 
FORTRAN • VOICE RECOGNITION SOFTWARE • AMIGA CLIP ART • 
GAMES FROM MICROPROSE, SSI, COSMI, EPYX • CP/M CATALOG • 
AMIGA CONFERENCES • GUITAR TUTOR • UmO PROGRAM • BOOMS 



NEW COMMODORE CEO 

CommiwJorc has .survived so many 
crises that nothing worries us anymore. 
Not even the loss of chief executive of- 
ficer Thomas J. Rattigan, head of the 
management team that put the company 
back in the biaclc after the closest brush 
with bankruptcy in its history. As peo- 
ple who read the financial section know, 
Rattigan was forced to resign in late 
April following an unsuccessful pow- 
er struggle with chairman and chief 
stockholder Irving Gould. The crux of 
their disagreement was a difference of 
opinion on how Commodore US oper- 
ations should be run, though a clash 
of personalities also played a role. 

The Wall Street Journal predicted 
that the shakeup would continue in the 
form of job cuts, eliminating up to 40% 
of Commodore's 200 administrative po- 
sitions. And this move, the Journal 
speculated, could complicate Commo- 
dore's relationship with the banks to 
which it remains in debt, at a time 
when the company is reportedly trying 
to raise financing through a debenture 
offering due to its banks' refusal to put 
up more money. 

Complicate the relationship it cer- 
tainly will. But blow it apart? We don't 
think so. Commodore has come back 
from too much worse to be derailed by 
a little executive head-axing, or reac- 
tion to same. The company is on a roll 
—if that feet is not evident to dieir pres- 
ent banks, it will be to other funding 
sources. Especially when the Amiga 
500 starts selling like Donna Rice but- 
tons at a Republican Convention. 

Commodore International, 215-931- 
4100 (see address list, page 12). 

STRING FUNCTIONS 

Guitar Wizard ($24.95) helps guitar- 
ists leani and analyze the fingerings and 
fretboard patterns for all types of 

8 AHOfi 




For all types of fretted instruments. 
READER SERVICE NO. 163 

chords and scales at different positions 
on the neck. Notes and positions are 
shown in graphic displays that can be 
viewed onscreen or printed out. The 
program can be used with all types of 
fretted instruments in both standard and 
non-standard tunings. 
Baudville (see address list, page 12). 

PICK A WINNER 

Of course, you and we know that 
there's no valid method for predicting 
winning lottery numbers. But gamb- 
lers are a superstitious lot. And for 
them. The Lotto Program ($24.95) will 
analyze past winning numbers to pre- 
dict what numbers are likely to come 
up in the next few drawings. Usable 
with all 6 and 7 number games, the 
program produces charts from which 
you can extract hot and cold numbers, 
frequency, patterns, sums of digits, dig- 
it groups, and more. Because you pick 
your own numbers from the data gen- 
erated, your selections won't match 



those of other owners. For the 64. 

Soft-Byte, 513-278-8044 (see address 
list, page 12). 

CP/M SOFTWARE DISKS 

Poseidon Electronics' spring/summer 
catalog of public domain CP/M soft- 
ware is now available. Price of the cat- 
alog is $2.00 plus .73 postage; the soft- 
ware costs $16 per disk. Please note, 
however, that the company will be 
closed for July and August. 

Pbseidon requests that any custom- 
ers who have not received mailings re- 
cently contact them, as 50 names were 
recently lost from their database. 

Pbseidon Electronics (see address 
list, page 12). 

BOOK RELEASES 

Becoming an Amiga Artist ($19.95) 
tutors beginning and advanced users on 
the creation of charts, graphs, paint- 
ings, tech drawings, digitized images, 
animation, sound, and speech. Covered 
topics include programming in Ami- 
ga BASIC, reproducing screens on 
printers, VCRs, and plotters, and work- 
ing with digitizers, genlock devices, 
and MIDI interfaces. 

Scott, Foresman and Company, 312- 
729-3000 (see address list, page 12). 

The following from Prentice Hall: 

TJie Brady Manual of Spreadsheet 
Style ($12.95) gives professional guide- 
lines for creating spreadsheets and de- 
veloping habits that make spreadsheet 
analyses faster and more reliable. 

The Master Guide to CompuServe 
($19.95) saves the user time and money 
that would otherwise be wasted experi- 
menting online by outlining fast meth- 
ods of finding desired information. The 
overall structure of CompuServe is ex- 
amined, along with features for sophis- 
ticated applications and search and re- 
trieval skills. 



"SOMETHING TO BYTE INTO 



ABACUS 

Basic 128 $38.95 

Basic 64 25.75 

Cadpak 128 38 95 

CadpakB-l 25.95 

Chartpak 128 25.95 

Chartpak 64.. 25.95 

Cobol 64 25 95 

CobDl 128 37.95 

Speed Term 25.95 

Super C Compiler 64/128.... 38.95 
Super Pascal 48.95 

BRODERBUND 

Where in the World 

is Carmen Sandiago $21.95 

P/S Library 1 •2-3 ea 15.95 

Print Shop 26.95 

Print Shop Companion 21.95 

Toy Shop 39.95 

P/S Holiday Library 15.95 

MICROLEAGUE 

Box Score/Stal Compiler $16.95 

General Manager Disk 24.95 

Micro League Baseball 24.95 

Team Disks 16.95 

RIBBON 

(Min. 6 per order) 

Axiom Elite 5 LCD $ 5.95 

Brother 15, 25, 35 5.95 

Commodore 1525 6.95 

Commodore 1526 6,95 

Epson 185 6.95 

Epson 85 4.95 

Epsonmx,(x. rx 100 6.95 

Epson mx. tx. rx 60 4.95 

Gorilla Banana 6,95 

Juki 6000 4.95 

Juki 6100 3.95 

Legend 880. 1080. 808 6.95 

MPS 801 6.95 

MPS 803 6.95 

OKI 182, 192 7.95 

OKI 82, 92. 83. 93 2.25 

SG 10-15 2.25 

Panasonic 1081. 1091 8.95 

INFOCOM 

Enchanter,,.,. 21,95 

Hitchhiker's Guide 21,95 

Hollywood Hijinx 21 .95 

Invisiclues ea 6.00 

Leather Goddesses 

OlPhobos 21.95 

Speiibreaker 26,95 

Trinity 128 24.95 

Zork 1-2-3 ea 25.95 

Sorcerer 24.95 

DATAEAST 

Commando $21,95 

Karate Champ 21.95 

Kung Fu Master 21.95 

Tag Team Wrestling 21.95 

GAMESTAR 

Baseball $21.95 

Basketball 2 on 2 21.95 

Foolball 21,95 



PRECISION 

Superbase 128 $56.95 

Superbase 64 46.95 

Superscript 128 47.95 

Superscript 64 46.95 

TIMEWORKS 

Data Manager 128 $42.95 

Data Manager II 29.95 

Partner 128 42.95 

Swift Calc 128 w/Sideways.. 42.95 

Swift Calc 64 w/SitJeways. . . 29.95 

Word Writer 128 w/Speller . . . 42.95 

Word Writer 3 w/Speller 29.95 

Partner 641 38.95 

DIGITAL SOLUTIONS 

PockelWriler II 41.95 

Super Pak 54 ,34.95 

Super Pak 128 44.95 

MtCROPHOSE 

Conllict in Vietnam 24,95 

Crusade in Europe 24.95 

F-15 Strike Eagle 21.95 

Gunship 21.95 

Silent Service 21.95 

Top Gunner 18.95 

SPRINGBOARD 

Cenlticate Maker $29.95 

Clip An 1 20.95 

CiipArtll 24.95 

Clip Art III 24,95 

Newsroom 29,95 

Graphic Expander 21.95 

Certificate Makerfl 21.95 

ACCESS 

Leader Board $24.95 

L.B. Tournament Disk 14.95 

Mach 128 30,95 

Mach 5 21,95 

10th Frame 24.95 

Triple Pack 14.95 

World Class Leader Board .... 25.95 



HOT SELLERS 

Commando $21. 

FIsl II 19. 

Gato 19. 

Ghosts-n-Goblins 19, 

Kung Full 19. 

Parallax 19, 

Power 12. 

Rush-n-Atlack & 

Yie Ar Kung Fu 19, 

Star Fleet 1 29. 

Strike Force Cobra 13, 

Tag Team Wreslting 21 

Uchi Mala 19, 

Uridium 19, 

X-15 Alpha Mission 19, 



95 1 
95 I 
95 I 
95 I 
95 j 
95 I 
95 I 

95 ! 
95 1 

95 
95 I 

95! 



95 



95 1 
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AVALON HILL 

Superbowl Sunday $19.95 

S.B. Sunday Stat Compiler. .. 16.95 
Team Disk 12.95 



DATASOFT 

Alternate Reality $24.95 

Black Magic 16.95 

Crosscheck 19,95 

Goonies 18.95 

Mercenary 18.95 

Mind Pursuit 18.95 

Never Ending Story 18,95 

Gunslmger 19,95 

221BBakerSI 19.95 

Theatre Europe 21 .95 



ACCESSORIES 




AlCP Disks (12) 


$ 7,95 


Commodore 1351 mouse. 


45.95 


Commodore 1 670 modem 


.135.95 


Disk Nolcher 


. 5.95 


Disk Storage Case (70) . . 


. 8,95 


Drive Cleaner 


. 7.95 


Flexidraw Light Pen 

Messenger Modem 


. 74.95 


. 35,95 


WICO Boss Joystick,, ., 


, 11.50 


WICO Bat Handle 




Joystick 


. 15.50 


WICO Three Way 


Joystick 


. 18,95 


Xetek Graphic Interface. . 


. 54.95 


Xetek Graphic Jr 


. 34.95 



ELA 

America's Cup $22,95 

Artie Fox 22,95 

Auto Duel 34.95 

Bard's Tale 24.95 

Bard's Tale II 27.95 

Chessmaster 2000 26.95 

Lords o( Conquest 24.95 

Marble Madness 21,95 

Mind Mirror 21,95 

Moebius 26.95 

Movie Maker 24.95 

Murder Party 29.95 

Orge 26.95 

Quizam 21,95 

Scrabble 22,95 

Ultima 1 28.95 

Ultima IV 39.95 

Ultimate Wizard 22.95 

MINDSCAPE 

Bop and Wrestle $18.95 

Fairlight 18,95 

High Roller 18.95 

Indoor Sports 18.95 

Inliitratof 18.95 

Lords of Midnight 17.95 

BERKELEY SOFTWARE 

GEOS .$36.95 

GEOS Fontpak 1 18,95 

GEOS Desk Pack 22.95 

Geodex 24.95 

Writer Work Shop 31.95 

SOLID STATE SOFTWARE 

VizaStar 128 $69.95 

VizaWrite 128 59.95 



ACCOLADE 

Dambuslers $18,95 

Fight Night 18.95 

Hard Ball 18.95 

LawoftheWesi 18.95 

PSI 5 Trading Comp 18.95 

Kill Until Dead 18,95 

Ace of Aces 18,95 

Deceptor 12.95 

Comics 18.95 

ACTIVISION 

Aliens.... $21.95 

Alter Ego 29.95 

Cross (country Road Race — 19.95 

Gamemaker 24.95 

Gamemaker Sci/Flclion 14.95 

Gamemaker Sports 14.95 

Hacker II,, 21.95 

Labyrinth 21.95 

Mindshadow 19.95 

Murder on the Mississippi 21.95 

Music Studio 21.95 

Rocky Morrow Show 18,95 

Shanghai 21,95 

Tass Times in Tonetown 21 .95 

Titanic 15.95 

Transformers 21.95 

EPYX 

Fast Load $23,95 

Multiplan 64/128 29.95 

Programmers Toll Kit 27.95 

Vorpal 21.95 

World Karale 

Championship 18,95 

World's Greatest 

Baseball 23.95 

Super Cycle 24.95 

World Games 24.95 

World's Greatest 

Football 24.95 

Movie Monster 24.95 

Championship 

Wrestling 24,95 

Destroyer 24.95 

Winter Games 23.95 

FIREBIRD 

Elite $19.95 

Colossus Chess-IV 21,95 

Music Systems 24.95 

Advance Music Systems 49.95 

The Pawn 28.95 

StarGlider 24.95 

Tracker 24.95 

SSI 

Battle of Antietam $29.95 

Carrier Force 36.95 

Phantasie II 24.95 

Rings of Zelphin 24.95 

Wizard's Crown 24.95 

Roadwar 2000 24.95 

SUBLOGIC 

Fligtil Sim II $34.95 

Football 27.95 

Jet 27.95 

Pure Stat Baseball 34.95 

Scenery Disk 1-6 ea 14.95 

Scenery Disk # 7 14.95 

Stadium Disk (baseball) 14.95 

Up Periscope 18.95 



\ 



CALL US TOLL FREE 

orders 1 -800-634-AICP Only 



Customer Service 

718-351-1864 

10AM to 6PM 

E.S.T. 




flfnERICflW jryTEflf^flTJDf^flJ. 
CDdPJTEH PHDOIJCTS 

P.O. Box 1758 
Staten Island, N.Y. 10314 

Reader Service No. \32 
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WHAT DO THEY SAY? 



"// languages interest you, 
this one is well worth a look 
... You may find that it's just 
what you have been looking 
for." - Jim Butterfield. 
COMPUTE! magazine 

"COMAL was just what 1 was 
looking for." - Colin 
Thompson, RUN magazine 

"I don't have enough space to 
list all the good points!" - 
Noland Brown. Midnite 
Software Gazette 



"I can recommend a belter, 
faster, and cheaper 
programming language ... 
COMAL, the most user 
friendly language around." - 
Mark Brown, INFO magazine 



"Combines some of the best 
features of languages like 
Logo, Modula, Pascal, and Ada 
in an easy to use format." - 
Ahoy magazine 



"COMAL seems to be bringing 
back an interest in 
programming." - G Stafford 



Find out for yourself. Just 
send us a 39 cent stamped 
self addressed envelope. We'll 
send you our 24 page COMAL 
information booklet. 

COMAL is available for the 
C64, CI28, CP/M, and IBM PC. 
Coming soon for Amiga, 
Macintosh, and Apple II. 

COMAL Users Group USA Ltd 
6041 Monona Drive, Room 111 
Madison, WI 53716 
phone: (608) 222-4432 
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Prentice Hall Press (see address list, 
page 12). 

The Bald's Tale II Hint Book ($10.00) 
contains all 25 dungeon levels plus city 
maps, and reference sheets for mon- 
sters, magical items, and weapons. 

Elkon Enterprises, 817-692-2781 (see 
address list, page 12). 

PORTABLE MODEM 

The pocket-sized Practical Modem 
1200 SA Mini ($199), which retains all 
the features of Practical Peripherals' 
full-sized, Hayes-compatible Modem 
1200, will plug into your 64 or 128 via 
an RS232-C interface. The battery-op- 



tistics) and beginner's articles on top- 
ics like computer cleaning, vocabulary, 
and the like. 

They've also got a regular feature 
called First Time Tales, each month 
profiling a different user's humorous 
maiden voyage into the field of micro- 
computing. And that's the main reason 
we're mentioning the newsletter in 
Scuttlebutt. In the time since Ahoy! de- 
buted nearly four years ago, at least two 
thirds of the people who've bought mi- 
crocomputers have tried to sell us a hu- 
morous account of their maiden voy- 
age into the field of microcomputing. 
Well, look— there's now somebody soli- 




Mini modem with 1200 or 300 bps rate and auto dial/auto answer capabilities. 
READER SERVICE NO. 162 



crated portable has a menu-driven con- 
figuration (no switches to set) and will 
store and autodial 10 phone numbers. 
Practical Peripherals. 818-991-8200 
(see address list, page 12). 

AMIOA CONVENTIONS 

A trio of three-day exhibition/confer- 
ences to be held in New York (Octo- 
ber), San Francisco (February), and 
Chicago (May), AmigaEXPO will 
serve Amiga owners, developers, and 
dealers with seminars, development 
forums, and new product displays. For 
more details, see the ad on page 55 of 
this issue. 

AmigaEXPO Headquarters (see ad- 
dress list, page 12). 

WOMEN'S NEWSLETTER 

Women Computing divides its 12 
monthly pages between female-orien- 
ted features (interviews with women 
executives, female v. male usage sta- 



citing these stories. So don't send them 
here anymore! 

A sample copy is available on re- 
quest; or, send $36 for 12 issues. 

Women Computing, 619-297-7094 
(see address list, page 12). 



Pecan has enhanced its FORTRAN-77 
compiler for the Amiga (S99.95) to in- 
clude support for TYPE COMPLEX, 
the "ERR =" option, list-directed I/O, 
support for IEEE standard 2 and 4 
wond real values, string subset and con- 
catenation routines, and more. 

Pecan Software Systems, Inc. , 718- 
851-3100 (see address list, page 12). 

CURES LOCKJAW 

When teamed with Covox's Voice 
Master hardware, the memory-resident 
Voice Key voice recognition software 
allows C-64 users to utilize spoken 
rather than typed commands with their 
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programs. Price of the disk and docu- 
mentation is S29.95. 

Covox Inc., 503-342-1271 (see ad- 
dress list, page 12). 



More releases in the Strider's Com- 
puter Classics line of music apprecia- 
tion disks, each combining up to an 
hour of music with as many as 60 
screens of commentary on the compos- 
ers and their work: Viennese Sonatinas 
(Mozart), Music Antigua (1500's), 
Bach Favorites, and Sonatinas by Mu- 
zio Clementi. 

Free Spirit Software, Inc.. 312-352- 
7323 (see address list, page 12). 

AMIGA CLIP ART 

Two new clip art collections, each 
S29.95, for use with DeluxePaint 11, 
DelwcePrint , and DeluxeVideo on the 
Amiga: 

An Parts: Volume 2 comprises over 
125 images and brushes ranging from 
stars and planets to farm animals to hu- 
man faces. 

Seasons & Holidays has over 100 
images covering more than a dozen 
holidays and special occasions. 

Electronic Arts, 415-571-7171 (see ad- 
dress list, page 12). 

AMIGA SPELL CHECKING 

The LexCheck spelling checker 
($42.95) works with Textcraft, Scrib- 
ble!, and Notepad formatted files, in 
addition to ASCII text files. The 
100,000-word master dictionary resides 
on disk, enabling the program to use 
under lOOK of RAM so that you can 
run it simultaneously with your word 
processor. A two-page document can 
be checked in under one minute. 

Complete Data Automation, Inc., 
916-842-3431 (see address list, page 12). 

GAMES 

Continuing in the neighborhood 
pick-up game spirit of Epyx's Street 
Sports line, Street Sports Baseball fea- 
tures touches like a field dotted with 
bushes and tree stumps, and bases 
made from trash can lids and cardboard 
boxes. Each player controls pitches, 
times batters' swings, and regulates 
field action. For the 64. 

Epyx, Inc., 415-366-0606 (see ad- 
dress list, page 12). 



Superstar Ice Hockey ($34.95) lets 
one or two C-64 players take the ice 
as center or goalie, firing slapshots, 
hip-checking opponents, and blocking 
shots, along with coaching their teams 
and trading and drafting players. 

Mindscape, Inc. , 312-480-7667 (see 
address list, page 12). 

SSrs first real-fime C-64 flight sim- 
ulator, B-24 ($34.95) recreates 19 
WWII missions flown by the 406th 
Bombardment Group to the Ploesti, 
Romania oil fields. The player acts as 
pilot, co-pilot, navigator, engineer, and 
bombardier of the lead B-24 Libera- 
tor plane, and determines the flight 
path, speed, altitude, and bomb drop 
points for the entire formation. 

SSI also announced a five-year 
agreement with TSR, Inc. to produce 
at least 10 role-playing and several ac- 
tion games based on Advanced Dun- 
geons & Dragons. The games, to be 
available for the 64 and Amiga among 
other machines, will begin to appear 
in eariy 1988. 

Strategic Simulations, Inc. , 415-964- 
1353 (see address list, page 12). 

An Amiga (512K) adaptation of Mi- 
croProse's Silent Service submarine 
simulation utilizes onscreen icons for 
all function and activity selections, dig- 
itized sound recordings from actual 
submarine listening devices, and 32- 
color batde station screens. The pro- 
gram is designed for mouse control, 
but joystick and keyboard operation is 
also supported. 

MicroProse Simulation Software, 
301-771-1151 (see address list, page 12). 

Combining text adventure with 
scrolling graphics. Delta Man ($19.95) 
takes place in a post-holocaust Chica- 
go, Having survived thanks to your ro- 
botic space suit, you pick through the 
wreckage to find supplies, weapons, 
and fuel, ward off roaming bands of 
mutants, and search for other surviv- 
ing humans until you can escape. For 
the C-64. 

Cosmi, 213-835-9687 (see address 
list, page 12). 

The C-64 gamer must avoid the en- 
ergy-absorbing stares of The Sentry and 
her Landgazers while attempting 
through cunning strategy to usurp her 
as ruler of an alien world. Price is 
$39.95. 

Firebird Licensees (see address list. 



HOW DOES IT RATE? 



Overall Rating A 

Ease of Use A 

Documentation A 

Reliability A 

Error Handling A 

Value for Money A 
COMAL Starters Kit rated by 
The Book of Commodore 64 
Software 



Performance 10 

Ease of Use 9 

Reliability 9 

Documentation 8 

COMAL Starters Kit rated by 
The Best Vic /C 64 Software 
(10 is highest possible rating) 



Overall rating: • • * • • 

Commodore 64 COMAL 2.0 
cartridge rated by INFO 
magazine (5 stars is the 
highest possible rating) 



Overall rating: • • • * 
Commodore 64 COMAL disk 
(COMAL Starters Kit) rated 
by INFO magazine 



COMAL is a well designed 
programming language now 
available for Commodore: 

C64 COMAL starters kit: $30 
C64 COMAL cartridge: $139 
CI 28 COMAL cartridge: $185 
CI 28 CP/M COMAL: $50 
IBM PC MS-DOS COMAL: $50 
(add $4 shipping) 

Demo disk for C64: $5 
Demo disk for MS-DOS: $5 

Under development for Amiga, 
Macintosh, and Apple If. 

COMAL Users Group USA Ltd 
6041 Monona Drive, Room 111 
Madison, WI 53716 
phone: (608) 222-4432 

AHOY! 11 
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RENT-A-DISC 

Frederick Building #345 

Huntington. WV 25701 

(304) 529-3232 
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COMMODORE 

AUTHORIZED 

SERVICE 



POWER SUPPLY (C-64) $29.95 

C-64 REPAIR 44.95 

1541/1571 ALIGNMENT 35.00 

1541 REPAIRS ALIGNMENT 75.00 

C-1 28 REPAIR 95.00 

1571 REPAIR 95.00 

POWER SUPPLY (C-128) 84.95 

NOISE/SURGE PROTECTOR 17.95 

EXTENDED WARRANTY CALL 

Free Return Freight - Continental US 

Add $10 forAPO. FPO, AIR 

Save COD charge - send Check or 

Money Order. (Purchase Order Accepted) 



Second Source 
Engineering 

2664 Mercantile Drive 

Rancho Cordova, CA 95670 

(916)635-3725 




Delta Man: post-nuclear survivalism. 
READER SERVICE NO. 170 

page 12). 

Darkhom ($30.00) allows up to four 
C-64 strategists to compete simultan- 
eously in real time, utilizing the key- 
board, joystick, and paddles in any 
combination. Each player commands 
the army of one of the world's four ma- 
jor powers, which meet for a final con- 
flict under the shadow of the towering 
mountain Darkhorn. Men, elves, and 
dwarves from each army fan out in all 
directions, recruiting new members in 
the villages and forests, while others 
fortify castles and prepare for the bat- 



tle. The winner must fece the Dark- 
lord, who watches from his fortress. 

Avalon Hill, 301-254-9200 (see ad- 
dress list, page 12). 

As the Sky Runner (S29.95) you must 
save 24th century mankind from the 
deadly and addictive drug Sky by de- 
stroying the huge harvesting machines 
and their defense towers. For the 64. 

Spinnaker Software, 617-494-1200 
(see address list, page 12). 

Two from Infocom, each $34.95 for 
the 64. $39,95 for the Amiga; 

Infocom's firet interactive horror 
story. The Lurking Horror finds you 
compelled by a mysterious force to 
rummage through old basements, stor- 
age rooms, and decrepit tunnels on 
your college campus. Included is a 
mail-in coupon enabling you to pur- 
chase Suspect for $14.95. 

In Stationfall you and Floyd (robot 
star of prequel Planeifall) travel on a 
routine mission to a space station to 
find it deserted save for an ostrich, an 
Arcturian balloon creature, and a 
brainy robot named Plato. The coupon 
Continued on page 61 
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AmigaEXPO Headquarters 


hi 


Pecan hoftware systems 


211 Easi 43rd Street, Sie. 301 


1410 39lh Street 


New York. NY 10017 


ScHfffebvft 


Brooklyn. NY 11218 


Avalon Hill 




Phone: 718-851-3100 


Microcomputer Games Div. 




Boseidon Electronics 


4517 Harford Road 


Elkon Enterprises 


103 Waverly Place 


Baltimore, MD 21214 


2914 Pennsylvania 


New York, NY 10011 


Phone: 301-254-9200 


Wichita Falls, TX 76309 


Phone: 212-777-9515 


Baudville 


Phone: 817-692-2rei 


Practical Peripherals 


1001 Medical Park Dr.. S.E. 


Epyx, Inc. 


31245 La Baya Drive 


Grand Rapids. MI 49506 


600 Galveston Drive 


Westlake Village, CA 91362 


Commodore International 


P.O. Box 8020 


Phone: 818-991-8200 


1200 Wilson Drive 


RedvTOod City, CA 94063 


Prentice Hall Press 


West Chester, PA 19380 


Phone: 415-366-0606 


One Gulf -t- Western Piura 


Phone: 215^31 9100 


Firebird Licensees 


New York, NY 10023 


Complete Data Automation 


74 Nonh Central Avenue 


Scott, Foresman and Co. 


P.O. Box 1052 


Ramsey. NJ 07446 


1900 East Lake Avenue 


Yreka, CA 96097 


Phone: 201-934-7373 


Glenview. IL 60025 


Phone: 916-842-3431 


Free Spirit Software, Inc. 


Phone: 312-729-3000 


Cosmi 


538 East Edgewood 


Soft-Byte 


415 North Figueroa Street 


UGrange, IL 60525 


P.O. Box 5701, Forest Park 


Wilmington. CA 90744 


Phone: 312-352-7323 


Dayton, OH 45405 


Phone: 213-835-9687 


Inrocom, Inc. 


Phone: 513-278-8044 


Covojt, Inc. 


125 CambridgePark Drive 


Spinnaker Software 


675-D Conger Street 


Cambridge. MA 02140 


1 Kendall Square 


Eugene, OR 97402 


Phone: 617-492-6000 


Cambridge. MA 02139 


Phone: 503-342-1271 


Micro Prose 


Phone: 617-494-1200 


Delta Research 


120 Ijikefronl Drive 


Strategic Simulations, Inc. 


3867 l^ Colina Road 


Huivt Valley, MD 21030 


1046 North Rengstorff Ave. 


El Sobrantc, CA 94803 


Phone: 301-771-1151 


Mountain View, CA 94043 


Phone: 415-485-6867 


Mindscape, Inc. 


Phone: 4L5-964-1353 


Electronic Arts 


3444 Dundee Road 


Wbrnen Computing 


1820 Gateway Drive 


Nonhbrook, IL 60062 


2917 Upas Street 


San Mateo, CA 94404 


Phone: 312-480-7667 


San Diego. CA 92104 


Phone: 415-571-7171 




Phone: 619-297-7094 
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ave any of your programs taken a "crash" course 
lately? The kind that ends with the familiar 

? UNDEF'D STATEMENT ERROR 



Or maybe an ill-fated program keeps zipping from point 
A to point B when it was supposed to connect with point 
C. A careful check of the list reveals your problem. Now 
you remember what happened. 

While programming this soon-to-be masterpiece, you de- 
cided to give your fire-breathing dragon a mop of hair that 
Godzilla would envy. And, like all good dragons, he en- 
joys using greasy kid stuff when he combs his tousled head. 
Naturally you included a gooey sound effect whenever he 
stops the grease on. Since 01' Dragon Breath enjoys hav- 
ing the shiniest pate in Lizard Land, that gooey sound will 
be used a mega-bunch. 

You have all kinds of GOTO, GOSUB. and IF-THEN state- 
ments just waiting to activate your thrilling "Goo' noise. Prob- 
lem is, they alt send the program into oblivion. It seems 
that because you programmed these statements before you 
programmed the sound effect, you had no idea where to 
send them. No problem. You assigned each of them a tem- 
porary 'dummy' line number. You told yourself that when 
you finished the Goo routine, you'd go back and change 
the numbers. Time passed, and so did the memory of those 
ill-numbered statements. Oh well, all you have to do is lo- 
cate those dummies and correct them. There's probably not 
more than 500 of them. What the heclc. Lizard Head can 
hold his fiei7 breath and slippery comb until you change 
them. Thank goodness it wasn't a really long program! 

Sound familiar? I've definitely had my share of crash 
courses. If you're tired of your programs taking the wrong 
turn, put them on Route 64. Route 64 lets you eliminate 
references to line numbers and replace them with labels. 
What the heck are labels?! Just the greatest invention since 
the mud pie! Whoever originated the idea deserves top bill- 
ing in the Hacker's Hall of Fame. 

Labels save a bundle of time and effort when you're pro- 
gramming. For example, you could have programmed 
GOTO GOO', or GOSUB GOO', or IF A=I THEN *GOO'. 
Later, when you told it to, Route 64 would have changed 
the labels into the correct line numbers. You can use as 



many different labels as you want. The more routines you 
have, the handier Route 64 becomes. 

Remember to save a copy of Route 64 after you type it 
in. When run, the loader K)KEs the machine language data 
into memory and checks for errors. If none are found. Route 
64 is ready to use. 

Route 64 uses labels that are made up of letters, num- 
bers, or a combination of both, with an apostrophe (') at 
the beginning and end (i.e., 'GOO' or ABC123; etc.). Here 
are some examples: 

100 IF A=l THEN 'GOO' 

no GOSUB 'LOOP' 

120 GOTO 'ABC123' 

130 A=A-Fl:ON A GOTO 'GOO', 'LOOP', 'ABCl 

23' 

These are reference labels. As you can see, you just pro- 
gram the way you normally do, using reference labels in- 
stead of line numbers. You don't have to put spaces in your 
program. I did here for clarity. Your labels can be what- 
ever you like. For example, 'LOOP' could refer to a FOR- 
NEXT loop that you use a lot. 

RtHite 64 only changes reference labels that follow GOTO, 
GOSUB, and IF-THEN statements that are not part of a 
REM line, DATA line, or contained in quotes. 

When you begin writing a routine that is referenced by 
a label, just label the routine like this: 

200 'GOO' REM GOO ROUTINE 

These are destination labels. A delay loop might look some- 
thing like this: 

300 'LOOP' FOR J=l TO 1000: NEXT J 

You can also place a destination label on a tine by itself: 

AOO 'ABC 123' 

A 10 REM YOUR ROUTINE BEGINS HERE 

When you've finished your creation, and want Route 64 
to 'remap' the labels, just type SYS 52000, then press RE- 
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TURN. Here are the results; 



2r/j 



100 IF A=l THEN 

110 GOSUB 300 

120 GOTO 400 

130 A=A+1:0N A GOTO 200, 300, AOO 

After Route 64 remaps your reference labels, it asks if 
you want the destination labels removed. Pressing the N 
key leaves them intact and exits Route 64 via BASIC. You 
can always have Route 64 remove them later, if you want, 
ftemember, though, if you run your program and it stumbles 
across a forgotten label, a syntax error will blow 01' Laser 
Breath's fire out. 

Press the Y key to remove the destination labels, and 

200 'GOO' REM GOO ROUTINE 
will become 

200 REM GOO ROUTINE 
By the same token, 

300 'LOOP' FOR J=l TO 1000: NEXT J 
becomes 
300 FOR J=l TO 1000: NEXT J 



If you have a destination label on a line by itself, 

400 'ABC123' 
changes to 

400 : 

The colon keeps line 400 in your program. All former ref- 
erences to ABC123' will still have a route to take. 

While it's remapping your masterpiece, Route 64 checks 
for errors and, if any are found, tells you what they are. 
Here are the possible errors: 

A) 'Error In Label': forgetting the apostrophes, and/or 
using characters other than letters and numbers, in your 
labels. 

B) 'Undefined Label': using a reference label without a 
corresponding destination label. 

C) 'Duplicated Label': having more than one destination 
label of the same name. 

D) 'Line Too Long': excessive line length. For example, 
if the reference label 'A' were being changed to 10000 and, 
as a result, the line would exceed 80 characters, Route 64 
puts on the brakes. 

Route 64 can be brought to a halt at any time by press- 
ing the STOP key. 

Let your programming sessions travel on Route 64. Mr. 
Pompadour, your fire breathing comb twirler, will love you 
for it. D SEE PROGRAM USTING ON PAGE 87 
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THE GREAT CONNECTION 

300/ 1200 BAUD HAYES® COMPATIBLE MODEM 

Get Connected with the NEW TCM-I200H 300/1200 baud Hayes® compatible modem for the Commodore® C-64 and 

C-128 computers. 

Using the same technology and state-of-the-art circuitry that is used in our IBM® PC Half Card modem, the TCM-1200H 

was designed from the ground up to work with and enhance the C-64 and C-128 computers. 

Compatibility -that describes the TCM-1 200H. Just plug the connecting cable into the user port and you're all set. No RS-232 

interface and no power supplies to plug in. The TCM-1 200H derives its power from the computer. 

• Compatibility with terminal software. Most of the popular 
terminal software already have provisions for Hayes type 
modems, just change the modem type to Hayes and you're 
ready. 

• Compatibility with the popular Hayes "AT" commands. 
Unlike other so called Hayes compatible modems, the 
TCM-1 200H is fully Hayes compatible. 

• Compatibility with the FCC. The TCM-1200H is fully 
registered and type accepted with parts 68 and 15, 

In addition to being a vary compatible modem, the TCM-1 200H also offers tone or pulse dialing, speaker with volume 

control, 8 front panel LED's, two phone jacks. TWO YEAR warranty, a free Quantum-Link starter kit and terminal software 

with Punter and Xmodem file transfer. 

Feature for feature and dollar for dollar, the TCM-1 200H is truly the best modem choice for your Commodore C-64 or C-12g 

computer. 

For more information or to order the TCM-I200H, write or call: 

Trans Com, Inc. 703-13 Annoreno Dr., Addison, IL 60101 Phone (312) 543-9055 BBS (312) 543-0180 
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STEEPLECHASE 

For the C-64 



By 

TDny Brantner 



A steeplechase is a horse race which involves 
jumping over obstacles, such as walls and 
hedges. In this simulation of the sport, you 
can race against the clock or another player. 

You'll need Flankspeed (see page 79) to type in and save 
a copy of Steeplechase. After loading the program, type 
SYS 49152 and press I^ETURN to play. 

The title screen appears, prompting you to select a course 
length from one to three miles. Move a joystick plugged 
into Port 2 to the left or right to change the highlighted se- 
lection. When you have made your choice, press the fire 
button to begin. 

The game screen displays two separate windows. The joy- 
stick in Port 2 controls the horse in the top window, while 
the joystick in Port 1 controls the horse in the lower win- 
dow in a two player race. The elapsed time is shown in 
the upper left comer of the screen in minutes, seconds, and 
tenths of a second. At top center is the course length, and 
in the upper right comer is the lowest elapsed time recorded 
for the completed course. The distance traveled by each 
horse is shown, along with a bar meter representing the 
current speed. The horses enter from the left side of the 
screen, and when the gun sounds the race begins. 

To control a horse, move the corresponding joystick right 
to increase speed and left to slow down. Smooth scrolling 
is used in each window to simulate movement. In the back- 
ground, mountains and clouds scroll slowly, while obsta- 
cles in the foreground (stone walls, hills, hedges, and fences) 
move toward your horse more quickly. Press the fire button 
to jump over an obstacle. Aldiough some are easy to jump, 
others require you to build up speed to make it over. Stum- 
bling over an obstacle causes your horse to slow down, so 
you have to time the jump just right in order to keep your 
speed high. 

The course is randomly created at the beginning of each 
game. However, in the interest of lair play, both players mn 
the identical course simultaneously. The wmdow of the first 
player to reach the finish flashes, and if the time is lower 
than the best so fer, it is recorded and displayed during the 
next game. USEE PROGRAM USTING ON PAGE 88 
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SPttO 




The latest 



5«SS^ 




COPIES 99.90% OF PROTECTED SOFTWARE 
WITH POWER AND PARAMETERS TO SPARE... 
AND ONE FREE UPDATE 

• OVER 40 PARAMETERS built into ttie Invader Copying 
Modules are automatically called, when copying certain 
"Tough to Copy" disks. These are installed on SIDE 1 
with all the INVADER V9.5 COPIERS. 

• 1 70 EXTRA PARAMETERS, to copy recent disks that 
were impossible before are installed on SIDE 2 

of the LATEST DISK-INVADER V9.5. 

• USE WITH 1 Of 2 1541/1571 Drives or compatibles or 
MSD Dual Drive and COMMODORE 64 and 128 
(used in 64 mode). 

FAST Frie Copy Included, with 9 second 

NO KNOCK PEFIFECT FORMATTER. 

FAST FULL Disk Copier tor two 1541/1 571 copies 

■n under 1 minule 

FAST FULL Disk Copier tor one 1541/1571 copies 

in under 2 minules 

PRICE P 8, P INCL. US S36.50 CDN S49.S0 



splciw 



TO OnOSn send check 01 money order lo: A\/AK\Tni. ADV^^ AA 
Quebec residents, add 9% sales la« ^VMYH \Kzr/\KUt O^ 

18 Place Charny, Lorraine 
Quebec J6Z 3X9, Canada 



All orders shipped wilhin 48 hours 
Telephone- 1-5 14-62 1-2085 
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COMRUTeR DIRECT (A Di\fision of PRGTECTO) 







80 Column Printer • SVs" Letter Size 

15 Day Free Trial-Satisfaction or Your Money Back • 90 Day Immediate Replacement Policy 



Big Blue Printer 




(Add $7.50 Shipping) 



The Affordable Printer You 
Have Been Waiting For! 



• Dot Matrix • Heat Transfer 

• Upper/Lower Case (with true 
lower descenders) * Underline 

• Enlarged • Graphics 
• Plus Much More 



Sale 



$29 



95 



List $199 



This printer was made by Canon® for Ihe IBM PC and PCjr. The Big Blue printer comes ready to hook up to the serial port of the IBM®PC jr. Plus 
with low cost adapter cables you can connect the Big Blue printer to the Apple® II, He, lie, Apple Compatibles, Atari® , Commodore® 64 ,128, SX-64, 
Vic 20, Plus 4, IBM® PC, IBM®XT, IBM® AT, IBM Compatibles , TI-99, Tandy 1000, plus many more. 



lnt«lllg«nl Comino4Jor»(!/ Intsrfac* List $49,95 S<ila (1«.«S RS-IM Atioptar (»p«cify mal« or femola] LiM $19.95 Sal* * «.«5 

lnt«lllg«nt AtariiB Intsrfae* List $49,95 Sal* *1«.«S Papar (2 Rolls) List $19.95 Sal* * l.n 

LoMrlU. AppI* ")IU Inlvrfac* List $24.95 Sal* tIl.tS SIngI* Sh**l Pap«r (Q»y. 500) List $39.95 Sal* tll.W 

IBM. Af!p4«. Canon. Convnodor*. Alarl i Iomt ar* rvgiiltf kI IrwitfTKirtis ol Inltrnolionol feuiiiwu Mochirwt, Appt* Cwnputvf Conon Iik. Commodor* Buvrwi* Mochinn. Atari Inc. A Vidto TtchoDloftn RnpKiiwIii. 



Hi-Speed Printer Sale 

160 - 180 CPS • Lifetime Warranty* • Near Letter Quality 

Sale 

M99 




|CV NLQ-180 Printer 

NLQ-i80 Print Samples 



This is ah example of ITALIC;' 
En |-t Skn c= ^cd Boldface 

Cofiilenseil Teil Double-stri l<e 

example of Near Letter Quality 



All prices expire 8-31 -87 



Save 60(7o Off List Price 



List $499 



• Near Letter Quality Selectable From Front Panel Controls * High Speed Dot Matrix 

• Letter Quality Modes • 8K Buffer frees up computer 4-tinies faster • Super Graphics 

• Pica, Elite, Italics, Condensed • Business or Personal • Tractor /Friction • 15 Day Free Trial 
• Lifetime Warranty on Print Head* • 6 Month Immediate Replacement Policy • 



INTERFACES 



Atari $39.95 Apple 11 $44.95 Commodore $29.95 IBM $24.95 Laser 128 $19.95 Macintosh $49.95 



shipping, Hcincltin0 & Inaumnc* Chargvs 

Add $10.00 for shipping, handling, and iniuranc*. Illinoii r««id«ntt pl*a«« add 
6'/^% Kilvt fax. Add $20.00 (or ALASKA, CANADA, HAWAII. PUERro RICO A 
APO FPO ord«r.. All ord«r. mud b* in US, Dollori. WE ZX> NOT EXPORT TO 
OTHER COUNTRIES EXCEPT CANADA ft PUERTO RICO. EncloM CQ»hi«r chack. 
nnon*y ord«r or pertonal ch*cl<. Allow 1^ doyt for d*iJv*fY. 2 to 7 days tor phon« 
orders, 1 doy vKprass rnoil. Pric*s & AvaMobifitY tubt*et to change wiihour notice. 
VIS* — MASTEW CARD — C.O.D. Coll For COD. Chorges. 



A Division of PROTECTO 

22292 N. Pepper Road. 
Borrington, 111.60010 

We Loyfe Our Customers 




312/382-5244 

For Commodore eAtari 

312/382-5050 



For Apple » IBM 



Reader Service No. 131 



COMPUTER DIRECT (A Di^fision of PROTECTO) 






Complete C64 System 

IHCLUDES: Computer. Drive, MoniforA Printer 

Sale 

^399 




List $1045 



All this for *399 



• Commodore 64 Computer 

• Commodore 1541c Disk Drive 

• Hl-Res 12" Monochrome Monitor 

Monitor Cable 

• Big Biue Printer w/2 roiis paper 

Big Blue Intelligent Interface 



Complete Atari System 

INCLUDES: Computer, Drive, Monitor A Printer 

Sale 

" ^399 




All prices 
expire 8-31 -87 



^ 



Total Prices 



Complete Apple 
Compatible System 

Computer, Drive, Monitor, Printer A Software 

Sale 

$449 




List $1064 
All this for *399 List 



• Atari 130XE Computer 

• Atari 1050 Disk Drive 

• Hi-Res 12" Monochrome Monitor 

Monitor Cable 

• Big Biue Printer w/2 rolls paper 

Big Blue Intelligent Interface 

• Premium Word Processor 



'249°° 
•299 00 

*249" 
. |9« 

•199" 
• 49,1 

» 59" 



n045 



Total Prices 



'1124 



BS 




List $1228 



All this for only *449*: 

• Laser 128K Computer 

vicJeo, parallel & serial ports included 
runs virtually all Apple ll/llc/lle software 

• Hi Res 12" AAonochrome Monitor 

• Big Blue Printer with interface and paper 

• Software Paclcage: word processor, 

spreadsheet & data entry 

• Re«al*a tM MvrchandlM Dltcount When Sytlam Purcltafed at $4tt 

Appl«(!> il lh» r»qisler«d trodamork of Apple Compulan Inc, 



Complete IBM® XT 
Compatible System 

Computer, Drive, Monitor, Printer A SoHvtare 

Sale 

^599 




All this for only *599 : 



List $2495 



• 10 MHz / 512K Super Turbo XT Computer 

video, parallel & serial cards included 
3.2 MS DOS & G.W. Basic included 

• Hi-Res 12" Monochrome Monitor 

• Big Blue Printer \A/ith interface and paper 

• SoftiMore Paclcage: v^ord processor, 

spreadsheet & data base 

IIM® li Ih* r«slilarad trodnnarli of InlameMsnal Builntw Mochin«. Inc. 



Shtpplng, Handling & Inauranc* Chargss 

Add 135.00 for ihipping. handling, and injuronce. Illinois r«iid«ntj piaase add 
6'/.*/. >al*I tax. Add $70.00 lor ALASKA, CANADA, HAWAII, PUERTO RICO S 
APO-FPO ord»r». AM ord«rj muil b» In U.S. Dollorj. WE DO NOT EXPORT TO 
OTHER COUNTRIES EXCEPT CANADA S PUERTO RICO. EncloM caihiar ch«k. 
moo»y ordar of parional chwck. Allow 1 4 doyi lor d«llv«rY. 3 lo 7 doyt (or phona 
ordarj, I day aKprati mail, Pricai 4 Availability lobjac* to chor>ga wiihoui notica. 
VIS* — W tASTlK CAWD — C.Q.D. Coll For COD, Choroa., 



A Division of PROTECTO 

22292 N. Pepper Road, 
Barrington, III. 60010 

We Love Our Customers 




312/382-5244 

For Commodore 'Atari 

312/382-5050 

For Apple 'IBM 
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13" Color Monitor 

Removable Anti-Glare Screen 




All prices expire 8-31 -67 



List $329 



Monochrome Monitor 

• 12" Screen • 80 column 




Sale 



79 



Add »10.Q0 fhipp<ng 



List $249 



14" RGB & Composite 
Color Monitor 

Sale 




237 



Plu« Gr»«n Scr««n Option Switch. List $399 



Magnavox TV Tuner 

• UHF/VHF • Front Panel Programmable Selection 
But torn • Rabbit Ear Antenna 'Fine Tuning And More 



Remote Scan TV Tuner 

• Worki with Monitor/TV • Sleep Timer • Acceu to 139 

VHF/UHF/Coble Channel* • Signal Booster • Qtiartz 

Frequency Syntheilxed Tuner And More 




Add $3.00 (hipping Additions! t3.00 lor APO/FPO. 



List $130 




Add $3.00 ihlppmg. AddlHonol tS.OO for APO/FPO 



List $180 



* Monitor Composlt« Cablo S9.9S 



RGB BO Column Cable f 19.49 (Pl»as« specify computer type) 



15 Day Free Trial • 90 Day Immediate RepJacemenf Policy 

• Best Prices * Best Service In U^S,A. • One i}ay Express Mail * Free Catalogs • 



fthlpplng« Honflllng 4* Insurance CKorg** 

Add $14.50 (unlttiB oth#rwift« nct*d} for shipping, handing ond insurance. Illinois 

r*lld*nll pi*ai« odd 6'/i % tax. Monitors can only b« shiF^>*d to points larvad by 

Unllad Porc*l Sarvic* within iha 48 mainland ilat*>. Enclat* Caihiar Check. Money 

Order or Periorwil Check. Allow 1 4 day* ^or delivery, 2 to 7 doys for phone orders, 1 

doy expreu moil. Price* A Availability subjecl to change without notice. No 
VISA—MASTCRCAHD— C.O.D. Monitors APO-FPO. CALL FOB C.O.D. CHARGtS 



To (312) 382-5244 

Iffrfr^ ^JTOGF ^°'^ commodore •Atari 

Call (312) 382-5050 



For Apple • IBM 
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COMPUTER DIRECT (A Division of RROTECTG) ^ ^ 



C64 Computer 




List $299 



With purchase of our special *39.95 software 

Ail prices expire 8-31-87 



C64c Computer 

Included with each computer is the GEOS Program: 
word processor and a versatile drawing program. 




List $249 



Modem Package 

1200/300 Baud Auto Dial/Answer 



Sale 




1541c Disk Drive 

• With purchase of the game Trivia Fever, 
computerized trivia, at our sale price of $29.95 




List $249 



C 1 28 Computer 



• AutoCom Software Included • File 
Transfer • Tone/Pulse/Keyboard Dialing 
• Download Text/Data Files • Plus More List $329 




List $329 



• Be$t Prices » Be$t Service • IS Day Free Trial • 90 Day Immediate Kephcemmnt Policy * Free Catalog • 



Shtpplne, Handling & InaurancB Chatrgsa 

Add tlO.OO tor ihlpping. handling, and Iniurorm. Illinoii r««id«nt> plaasa add 
6V,*/. Kiln (OK. Add tJO.OO for ALASKA, CANADA. HAWAII. PUERTO RICO S 
APO-FPO ordart. AM ord«ri mu»t b* in U.S. Oollart, WE DO NOT EXPORT TO 
OTHER COUNTRIES EXCEPT CANADA « PUERTO RICO. EncloM cajhi.r ch«k. 
morv«v ordar or parsonol ch»<:k. Allow 14 dayi for delivery. 2 to 7 dayi for phon* 
order*. 1 doy •xpren moll. PrkM & Avallabill^y lubiect to change wilKout notice. 
V'»* — MASTIK CAKD — C.O.D. Coll For COD. Chorae* 




To (312) 382-5244 

fjf gar For Commcxlore •Atari 

Coll (312) 382-5050 



For Apple • IBM 
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SUMMER SIZZlEi W 



Comstar Aero Printer 




List $349 



• 150 -170 CPS • Impact Dot Matrix 

' 10" Carriage • Underlining • Super & Subscript 

• Elite, Condensed, Emphasized, and Enlarged 

• Centronics Parallel Port and Mucli More 



Daisy Wiieei 
Printer/Typewriter 

Sale 

$ 



159 



List $299 




• Drop-in Cassette Ribbon • Key in Buffer 

• Automatic Centering • 12" Large Carriage 

• Superb Letter Quality Correspondence 

• Centronics Parallel Port • Plus Much More 



Comstar 1 000 Printer 



Sale 

M49 








List $499 



Superb 

Near Letter 

Quality 



• 100 CPS Impact Dot Matrix • Underline 

• Double Strike • Superb Near Letter Quality 

• Pica. Elite, Condensed, Italics • Super/Subscript 

• 10" Carriage • Plus Much More 



Electronic Compact 
Printer/Iypewriter 

SaleS, 

$249 




List $399 



• 90.000 Word Dictionary • Centronics Parallel Port 

• LED Readout Flags Mistakes Before They Reach 

Print • 1 Line/ 240 Character Automatic Correction 

• Free 4K Memory Card Stores 4,000 Characters 



INTERFACES: Atari - $39.95 Apple II • $44.95 Commodore - $29.95 IBM - »24.95 Laser 12» - <19.95 



15 Day Free Trial • W Day Immediate Reptacement Warranty 

• Best Prices • Best Service tn U.S.A. * One Pay Express Mail • Free Catalogs • 



shipping. Handlln0 & litBuranc* Char||«a 

Add $10.00 if ordering ih* Comilor till* prinlan and $13.00 it ordaring tha 
prtntar/typawrllan >or ihipplng, handling and inioronca. Illlnoii raildanti plaoH add 
4'/.% »alai tax. Add $30.00 [r»plMlnfl $10,001 and $24.00 (rapiaclns $12.00) lor ALASKA. 
CANADA. PUERTO HICOSAPOFPOwdan. All ofdari mutt ba in U.S. OoilofS. WE DO NOT 
EXPORT TO OTHW COUNTRIES EXCEPT CANADA S PUERTO RICO. Enciau (Oihlar chack. 
monaY afda> or partonal chack Allow U day! lor dallvary. 2 Ia7 doyt for phona ordart. 1 
dOY axpratk rt^A- Pricat & Avaiiabilify tiib|ac1 to changa without i>o1lca. 
VISA — MASTtWCAWO — C.O.O. Coll tor CO. P. Chora>». 




To (312) 382-5244 

^^v|Jm» For Commodore aAiari 

Col! (3 12) 382-5050 



For Apple a IBM 
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Full Size Piano/Organ Keyboard 

Now With Conductor Software FREE! ^gm I ^ 




List $159 

With this 40 key (A-C) professional guage spring loaded keyboard, and the FREE Conductor Software included, you can play, 
record, compose and accomplish just about any musical feat from Bach to Rock. The built-in interface plugs right in to the 
joystick port of your Commodore 64/128. Just load the FREE Conductor Software (A $19.95 Value) and your on your way! 
• Adjust the keyboard to just about any instrument or sound you want • Teaches you how to play: from scales to any of the 35 
pre-recorded songs • Record and play back tracks uniill your composlition Is complete • Plus much More 



The Music Teaclier 

This Program teaches a beginner how to read music and play it 
correctly in rhythm on the keyboard. Features trumpet, organ, 
violin, synthesizer instrument sounds, built-in metronome, 
pause-play control and set-up menu for cusomizing the music 
teacher. (Disk) List $39.95 Sale $Z4.95 



The Printed Song 

With this program you can print out, in music notation, your 
comptostition for others to read or play. Requires The Conductor 
Program and printer compatible with the Commodore graphics 
mode such most dot matrix printers with a Commodore graphics 
interface. (Disk) List $29.95 Sale $19.95 



j^M^U 




SVa" Floppy Disic Sale 

Double Sided / Double Density 






100% CERTIFICATION TEST 

Eoch disk is individually checked so you will r>ever experience data or 
program loss during your lifetime! 

FREE REPLACEMENT LIFETIME WARRANTY 

We ore so sure of these disks that we give you a free replacement 
warranty agoinst failure to perform due to foulty materials or 
workmanship for as long as you own your disks. 

AUTOMATIC DUST REMOVER 

The smooth surface finish saves disk drive head wear during the life of 
the disk. (A rough surface will grind your disk drive heod like 
sortdpoper). The lint free automatic cleaning liner mokes sure dust & 
dirt are being constantly removed during disk operation. 




1 Box of 10 — $4.40 (44* ea.) 1 Box of 50 — $19.50 (3«« ea.) * 1 Box of 100 — $29.00 (29* ea.) 

0029 Paper Economy Sleeves (10) 50' 0030 Paper Economy Sleeves (100) $5.00 



Shipping, Han«llln0 & Insurance Charges 

Add S 3.00 lor thtpping, hondMrtg, ond iniuranc*. Illinois rviidvnts pivase add 
6Vi% solas lax. Add i 6.00 for ALASKA. CANADA. HAWAII. PUERTO RICO i 
APO'FPO ordars. All ordars must ba in U.S. Dollars. WE DO NOT EXPORT TO 
OTHER COUNTRIES EXCEPT CANADA & PUERTO RtCO. Enclosa coshiar clwck. 
monay ordar or parsonol chack. Allow 14 days for dallvary. 3 to 7 days lor phona 
ordars, 1 doy axprass mail. Prjcas A Availability subiact to changa without notica. 
VISA — MA«TB» C*»D — C.O.D. Coll For C.O.D. Choroas. 



COMPVTEB DIRia 

A Division of PROTECTO 

22292 N, Pepper Road, 
Borrington, 111. 60010 

We Love Our Customers 




312/382-5244 

For Commcxlore • Atari 

312/382-5050 

For Apple * IBM 
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A banner vrinter for the CI 28 



By Mike Heyt 




anner Print is a joystick-driven utility written 
for the Commodore 128 in 128 mode. It uses 
hi-res graphics to let you see your entire banner 
at any time. You can magnify and edit por- 
tions of your banner, add text, draw lines and dots, load 
or save it, and print it using a variety of options. Banner 
Print was designed to be used with the Okimate 10 or a 
Commodore 152 5 -compatible printer; it will work with 
other printers that can be used with the Commodore, but 
you may have to sacrifice some of the program's special 
printing options. 

Enter the program and save it to cassette or diskette. Af- 
ter you run the program, you will see the banner, a white 
strip, across the upper portion of the screen. At the bot- 
tom is a box filled with various labeled buttons. In the cen- 
ter of the box is an arrow. This is your pointer; you can 
control its movement by using a joystick in Port 2 , Notice 
that when the pointer is at the bottom of the screen, it moves 
fester than when it is near the banner. This allows you to 
have finer control of the pointer when drawing on the ban- 
ner. Using either set of arrow keys will also move the point- 
er, but it will not slow down when it is in the banner edit- 
ing area. The buttons at the bottom of the screen can be 
activated by positioning the pointer inside the box and press- 
ing the joystick trigger. You can also draw on the banner 
by moving the pointer where you want and pressing the trig- 
ger. "Vbu can draw lines by holding the trigger down while 




A banner file loaded onto Banner Print's main menu screen. 
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moving the pointer over the banner. When the pointer moves 
over a pixel that is white, it will turn it black, and vice 
versa. The black pixels represent areas of your banner that 
are printed on the printer. 

Following is an explanation of each of the 12 buttons. 
Next to the name of each button (in parentheses) is listed 
an equivalent keypress that can be used to activate the but- 
ton instead of positioning the pointer and pressing the trigger. 

DRAW (Dl 

Draw does just what it says. Move the pointer to the area 
of the banner you want to draw on, and press the trigger 
to draw. If the cursor is over a lighted pixel, it will turn 
it off. Likewise, if the cursor is over a dark pixel, it will 
turn it on. To draw long lines, just hold the trigger down 
and keep moving the pointer in the direction you desire. 

TIXT (T) 

This function allows you to type text directly onto your 
banner using the currently selected character set (see CHR 
SET below). When this button is selected, an arrow will 
point to the word TEXT" on the button. Move the pointer 
anywhere on your banner and press the joystick trigger to 
b^in entering text. A blue box appears where the next char- 
acter you type will be placed. Use the INST/DEL or the 
left/right cursor keys to move the box, or press the RE- 
TURN key to exit text mode and return control back to 
the pointer. 

ERASE (E) 

Be careful about selecting this button! It will erase your 
entire banner and let you start all over. Fortunately, you 
will be asked if you are sure of your decision. 

LENOTH (L) 

This button allows you to select a new length for your 
banner. Press RETURN to cancel, or l^r a number from 
1 to 120 to select the length. If the length of the banner 
is wider than the screen, the banner will "Vrap around" 
to the other side. When working on your banner, remem- 
ber that if it "wraps around" the screen, it is continued on 
the left side of the banner strip below it. 

HEIOHT (HI 

Pressing this button lets you select your banner's height. 
Enter the new height, from 8 to 24 pixels, or press RE- 
TURN to leave the height as it is. In relation to the height 



#2-FEB. 'B4 llluslrated tour of the 1541! 
Artificial inlelligence! Synapse's Itior Woiosen- 
1(0 interviewed! String (unctions! And ready 
10 enter: Music IWai(er Part II! Screen Marap. 
ulalion! Nigtti Attack! Relative Files! 


#3 - MAR. '84 Anatomy of the 64' Printer 
interfacing for VtC & 64! Educational software 
series begins! VIC game buyer's guide! And 
ready to enter: Address Book! Space Lanes! 
Random Files on the 64! Dynamic Power! 


#5 — MAY '64 Future ol Commodore! In- 
side BASIC storage! Memory management on 
the VIC & 64' Guide to spreadsheets' Hurray 
for arrays! And ready to enter: Math Master! 
Air Assault' Biorhythms! VIC Calculator! 


#6— JUNE '84 Game programming col- 
umn begins! Code generating programs! Ru- 
pert on inputting! Memory management con- 
tinues! And ready to enter: Post Time for the 
64 & VIC! Alpiner! Sound Concept! 


#7- JULY "84 MSO dual disk drive! Data- 
base t)uyer's guide! Training your cursor! 
Screen displays! File Sleutti! Users Groups! 
And ready to enter: Renumbering! Ctiecklist! 
Matti Defender! Brisk! Whafs My Job' 


#8— AUG. '84 Choosing a word proces- 
sor! Computational wizardry! Creating your 
own word games! Sound on the 64' And 
ready to enter: Micro-Minder! Directory As- 
sistance! The Terrible Twins! Words Worth! 


#9 — SEPT, "84 Program your own text ad- 
venture! Suild a C-64 cassette interface! Vid- 
eo RAM! Word processors, part II! And ready 
to enter: Salvage Diver! DOS! Sound Explorer! 
The Castle of Darkness! Base Conversioi>s! 


#10 -OCT. '84 C-64 graphics programs! 
Bit-mapped graphics' Joystick programming! 
Graphics processing! And ready to enter: VIC 
40 Column Operating System! BAM Read & 
Print! Emerald Elephant! Lawn Job' 


#11 -NOV. '84 Music programs S key- 
boards for the 64! Grapttics feature contin- 
ues! 2-D arrays! And ready to enter: FTE word 
processor! Block Editor! Alternate Cliaracier 
Set for ttte 64! Tunnel of Tomachon! 


#12- DEC. "84 Buyer's guide to printers! 
1525 printer tutorial! Fast graphics wtth cus- 
tom characters! User Guide to KMMM Pas- 
cal! Diving into BASIC! And ready to enter: 
Construction Co.! Space Patrol! Cross Ref! 


#13- JAN. '85 VIC and 64 OS exposed' 
Sprites! Insert a 1541 device » disconnect 
switch! Ghostbusters! And ready to enter: Ul- 
tra Mail! Music Tutor! Alice in Adventureland! 
Midprint! To the Top! Tape/Disk Transfer! 


#14 — FEB. '85 Printer interfacing! Multi- 
color sprites! Modems! Bulletin Boards! The- 
ory of game design! Buying a modem! And 
ready to enter: Futurewar! ftintasia! VIC Era- 
ser! Insurance Agent! Flankspeed! Telelink 64! 


#15-MAR. '85 Cfeating multiscreen 
gameboards! Inside ttie Plus/4! Commodore 
DOS! And ready to enter: Old Routine! Pro- 
grammable Functions! Automatic Line Nos! 
Home Budget! Salmon Run! Numerology! 


#16-APR. '85 Assembly language col- 
umn begins! Programming the joysbck! 1541 
disk drive alternatives! The Kernal! And ready 
to enter: Hop Around! Faster 64! Booter! Ele- 
eheck! BASIC Trace! Space Hunt! 


#17— MAY '85 Disk drive enhancements' 
Install a reset switch! Assembler escapades! 
And ready to enter: Super Duper! Tv*o-Col- 
umn Directory! DSKDU! Raid! DOS Plus! Font 
Editor! Tile Time! Interrupt Wedge! 


#18 — JUNE '85 Music 4 graphics entry 
system! How modems v«)rk! Inside the 6510! 
And ready to enter: Quad-Pnnt! Mapping 4.4! 
Towers of Hanoi! Speedy! Ouck Shoot' Bit 
Dumping! Screen Magic! 6510 Simulator! 


#19 -JULY '85 PROI*i1 Programming! 
3-part harmonies on VIC/64! Speeding pixels! 
And ready 1o enter: Auto-Append! Script Anal- 
ysis! Wizard of Im! Lucky Lottery! Brainlrame' 
Etch! Printat! Autos: Leasing v. Buying! 


#20 -AUG. '85 Inside the 128! Real-world 
simulations! Sound effects! Modems! And 
ready to enter: Windows! Formatler! Sound- 
a-Rama! Screen Dump! Selectachrome! Dis- 
inteorator! FIdQils! Gators N Snakes! 


#22 -OCT. '85 Create cartoon characters! 
Infinitesimal intrigue! Secrets of copy protec- 
tion! And ready to enter; Shotgun! Maestra! 
Solitaire! Mystery at Mycrofl Mews! Gravi- 
nauts! 1541 Cleaning Utility! Shadey Dump! 


#23— NOV. '85 Guide to adventure gam- 
ing! ML spnte manipulation! BASIC for begin- 
ners! And ready to enter: Lightning Loader! 
Knight's Tour! Chopper Flight! Rhythmic Bits! 
Instant Bug Repellent! File Scout! Slither! 


#24 -DEC. '85 Speech synthesizer! The 
IBM Connection! The year's 25 best entertain- 
mems! And ready to enter: Gypsy Starship! 
Directory Manipulator* Cloak! Gameloader! 
Jewel Quest! Lineout! Santa's Busy Day! 


#25- JAN. '86 Build a speech synthesfz- 
er! Survey of sports games! And ready to en- 
ter: Martian Monsters! Streamer Font! Micro- 
Sim! Haunted Castle! Knockout! Infraraid! 
Alarm Clock! Memory Check! Scratch Pad! 


#26- FEB. '86 Windows! Build an auto- 
exec cartridge! Align your 1541! Survey of 
flight simulators! Structured programming! 
And ready to enter: Arena! Head to Head! 
Crabfight! Treasure Wheel! Character Dump! 


#27— MAR. "86 Programming education- 
al games! Memory dumpers! Choosing a 
copy program! Custom characters! And ready 
to enter: AhoylTerm 128! Trivia Game Maker! 
Brickbusters! Easy Lister! Programmer's Aid! 


#28 -APR. '86 Comet catctiing! Survey 
of action and strategy games! Screen dum- 
ping! And ready to enter: Chrono-Wedge! Mr 
Mysto! Air Rescue! r^otemaker! Screen Win- 
dow! JCALC! Hidden Cavern! Swoop! 


#29 - MAY '86 128 graphic bit map' Epyx 
strategy guide! 128 commands! ML music 
programming! And ready to enter: Bigprint! 
Star Search! Failsafe! English Darts! Ski Folly! 
Free RAM Check! Alchemist's Apprenbce! 


#30-JUNE '86 Debugging dilemmas! 
Public domain software! Wmning at Ultima' 
Computer Aided Design! And ready to enter: 
LazyBASiC! Got A Match? Star Strike! Queen's 
and Bishop's Tours! Shaker! Trackdown! 


#31- JULY '86 Inside the Amiga! Condi- 
tional branching! Chess programs! 128 and 
64 DOS! And ready to enter: Screen Sleuth! 
Skull Castle! Head-on! fiebergall Run! Word- 
count! Crazy Joe! Fidgits' Music School! 


#32~AUG. HB Inside the Amiga, part II! 
Approaching infinity! C-64 war simulations! 
Pascal for beginners! ML giaphics! And ready 
to enter: Reversi! Highlight! Disk Catalager! 
Meteor Run! Trim! Step On It! Flap! 


#33 -SEPT. '86 Windows and viewports! 
Sound 4 music on the 64! COMAL! And ready 
to enter: The Last Nin|a! Speech64! Multi 
RAM! Dogcatcher! Trapped! Matchblocks! 
Variable Manager! Dual Dump! Mine Canyon! 


#34 -OCT. M Build a digital oscilloscope! 
ML speed techniques! And ready to enter: 
Vault of Terror! Quick Change! Penguins! At- 
tack Force! Disk Checkup! Dvorak Keyboard! 
Mountaineer Mack! 128 to 64 Autoboot! 


#35-N0V. '86 C-128 shadow registers! 
Data file handling! PROMAL' Habitat! And 
ready to enter: Teleporter! 128 RAM Check! 
Discs of Daedalus! Guardian! Tenpins! Syntax 
Patrol! Deluxe List! Long Lines! Detonation! 


#38 -DEC. '86 File manipulation! C-128 
shadow registers! Football games! And ready 
to enter: The Artist! Minotaur Maze! Mouse 
in the House! Lazy Source Code! Rebels and 
Lords! Speedway! The Editor! Micro City! 


#37— JAN. '87 Pointers and the monitor! 
Best games of '86! DOS for beginners! And 
ready to enter: Vortex! Hanger 14! BASIC 
Ahoy! Catacombs! Lixter! Dark Fortress! Per- 
maLine! Starligbter! Bugout! Screens! 


#38 — FEB '87 Hacking into machine lan- 
guage utilities! Amiga RAM expanders! And 
ready to enter: Window Magic! Crunchman! 
User Conventions! The Adventurer! More 
BASIC 123! Jailbreak! Turtle Rescue! 640! 


#39- MAR. '87 Basic esthetics! Survey 
of video tfigifizers! Muhiplayer games! And 
ready to enter: C-64 Compressor! Wizard Tag! 
Turbopoke! Rescue 128! Lights Out! Pinball 
Arcade! Slow Away! Caverns of Geehonk! 


#40-APR. '87 Inside the Amiga 2000! 
Fractals! Baseball games! COMAL, turtle 
graphics, and Logo! And ready to enter: Info- 
((ow! Laps! Pieman! List Formatter! Scramb- 
ler! Extended Background Mode! Planet Duel! 


#41 - MAY '87 Kemal power! 64 and Am- 
iga graphics! Microworlds in COMAL! Brain 
games! Dark Fortress master maps! And 
ready to enter: Moondog! Startup! Illusion 
Master! Wall Crawler! Scavenger Hunt! 
1 


#42- JUNE "87 Megaflops and microsec- 
onds! Sei-fi braingames! C-64 to Amiga file 
transfer! And ready to enter: D-Snap! Wraiths! 
Galactic Cab Co.! Cave of the Ice Ape! ALT 
Key 128! Power Squares! 128 Multi RAM! 


#43- JULY '87 Real world interlacing! Bit 
map graphics tutonal! C-64 graphic conver- 
sion! Martial arts software! And ready to en- 
ter: Wizard Tag II! Data Creator! Plink & Plonk! 
Univaders! Data Express! 128 Scroller' 
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Magnify mode enables you to draw and erase pixels on 
a magnified portion of your banner, just as in draw mode. 

you enter, the banner will grow in height on the screen. 

MAGNIFY (M) 

This control allows you to do detailed work on a portion 
of your banner. A green rectangle will appear at the upper 
left corner of your banner. Using the joystick, position the 
rectangle over the area you want to magnily. After press- 
ing the trigger, the screen will blank while the 128 magni- 
fies the selected area. After a few seconds, the banner dis- 
play will return, and the pointer will be positioned in the 
lower left area of the screen over the magnified view. You 
can draw and erase pixels on the magnified view as you 
do when using the draw mode. Once you have fmished. 
press the space bar and the control panel will reappear. 

PRINT (PI 

When you select this button, the program will ask you 
to prepare your printer and press the space bar to begin 
printing. While the banner is being printed, pressing the 
space bar stops the printer and gives you back control over 
the pointer. If you press "F" while the banner is printing, 
you can enter FAST mode. In FAST mode the screen blanks 
and the computer speeds up to 2 Mhz, thereby taking much 
less time to print your banner. Press "F" again to return 
to the normal "slow" speed. 

OPTIONS (O) 

Pressing this button allows you to choose options for print- 
ing your banner. The seven options are: 

1. Print Graphic Blocks: If you answer "Y" to die prompt, 
the banner will be drawn using graphic blocks (options 2 
and 3 will be skipped). Note that this option may not work 
on non-1525 compatible printers. 

2. Print Character: Press any character from the keyboard 
to u.se tor printing the banner. If your printer supports the 
Commodore graphic character set, you may use any graphic 
character on the keyboard. 

3. Fine Line Spacing: Answer "Y" to this prompt and 
your printer will squeeze lines of text together. "N" will let 



the printer do normal linefeeds. This option may not work 
on non-1525 compatible printers; if in doubt, consult your 
printer manual. 

4. Expand to Width of Page: Reply with '"Y" if you want 
to s-t-r-e-t-c-h the vertical pixels to take up an entire 80 
column print line. Selecting this skips option 5, the pixel 
height option, since you have allowed the program to select 
the height for you. 

5. Pixel Height: This will let you select the number of 
columns wide each pixel from the banner will be on pa- 
per. Note that the banner is rotated 90 degrees when printed, 
so pixel height refers to the height on the screen and the 
width on paper. 

6. Pixel Width: Enter a number from one to ten to select 
how many rows make up each pixel on paper. The higher 
the number, the longer your banner will be. 

7. Special Printer Codes: If your printer allows special 
options that you want to use, such as a bold or italic char- 
acter font, enter the ASCII equivalent of the code stated 
in your printers manual. If the code is made up of more 
than one ASCII code (an escape sequence, for example), 
you can continue entering codes until you type a "0", which 
signifies the end of the codes. For example, my Okimate 
10 defaults to skipping the perforation on continuous form 
paper. This feature would cause gaps in parts of my banner, 
so I would enter 27 (RETURN) 66 (RETURN) (RE- 
TURN) at the prompt to disable the perforation skip, which 
is the ASCII equivalent to ESC B, the sequence stated in 
my manual. 

CHR SET (CI 

This control allows you to select the uppercase/graphics 
set or the lower- and uppercase character set. 

SAVE (S) 

This will save your banner as a binary file. You can type 
up to 12 characters as the filename or just press RETURN 
to cancel the save. When you enter the filename, ".BNR" 
(BaNneR) is appended to it to distinguish the file from other 
programs or data files. Note that both the LOAD and SAVE 
features require a disk drive. Cassette users will either have 
to modify the load and save routines or do without these 
features. 

LOAD (C) 

Select this to load a banner file. RETURN cancels the 
load. The ".BNR" suffix is automatically appended to the 
end of the filename. 

OUIT (Ql 

Select this button when you've had enough! A prompt 
will ask you to confirm your decision in case you acciden- 
tally selected QUIT. 

The size of the final version of Banner Print surprised 
me. It would have been at least twice as long without the 
powerful graphics and sprite commands provided in BASIC 
7.0. I think Banner Print should prove to be a useful utility 
for your Commodore 128. D 

SEE PROGRAM LISTING ON PAGE 84 
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SCANNER 

A Beginner's Machine Language Monitor for the C-64 

By John KrutcK 



r 



Scunner, a Commodore 64 machine language 
monitor, was designed for beginners, though 
more advanced users may find it helpful as well. 
Its the kind of monitor that I wish I'd had when 
I was beginning with the 64. 

Scanner lets you look at any location in memor>' and ob- 
serve its contents in binary and hexadecimal and as an ASCII 
character. Scanner is graphics-oriented. Memory locations 
are represented as cells, and Scanner itself is represented 
as a window above the memory cells. You can scan for- 
ward or backward through memory just by pressing a key. 
A handy feature of Scunner is that its display is contin- 
uously updated. Each memory cell on the screen is updated 
15 times per second, making it easy to see what's happen- 
ing in memory locations that change as you press various 
keys or which change for some other reason. This is espe- 
cially useful for examining the lowest IK of memory, where 
there are many locations whose contents change frequently 
to reflect changes in the system. 

Flankspeed (page 79) is required to enter Scanner When 
you've finished making a copy. u.se LOAD ''FILENAME",8,1 
to load from disk or LOAD "FILENAME'l,! to load from 
tape. Then use SYS 49152 to start the program. 

To use it. just remember that Scanner is a moving win- 
dow that lets you scan up and down through memory. Press 
fl to move the window up one memory cell (toward high 
memory). Keep fl pressed to scan up continuously. Press 
f3 to move the window down one memory cell (toward low 
memory). Keep t3 pressed to scan down continuously. 

To switch the window to a new group of memory cells. 
press f7. A panel with a cursor will appear at the top of 
the screen. Type an address using tour hex digits. For ex- 
ample, to see zero page location SE5 type 

00E5 

The memory cell plus the next four cells will appear. 

The address of the memory cell is the four-digit hexa- 
decimal number on the dark blue field; on the light blue 
field are shown the contents of the cell in binary, hex, and 
as an ASCII chai^acter. The contents are shown as an ASCII 
character only if they are an alphanumeric or punctuation 
character. If the contents are a graphics or control charac- 
ter, it is not shown. 

To understand exactly what you're seeing in the 64K mem- 
ory cells of the Commodore 64 requires a memory map, 
such as the one found in the Programmer's Reference Guide. 
To get you started, however, here are a few of the more 
interesting memory locations on a C-64: 

$00A0 

Locations SOOAO, SOOAl, and S00A2 form the jiffy clock. 
The byte at $00A2 is incremented every 1/60 second (the 



60 Hz AC power line provides the reference). Each time 
$00A2 reaches $FF, the byte at SOOAl is incremented, and 
each time SOOAl reaches SFF, the byte at SOOAO is incre- 
mented. You can't see every single change in the contents 
of $00A2 because while $00A2 is changing 60 times per 
second. Scanner is only updating $00A2 at the rale of 15 
times per .second. 

$00C5 

This location contains a code (not ASCII) indicatiiig what 
key, if any, is being pressed. Fre.ssing the key, for instance, 
will produce a code of $23. A code of S40 means no key 
is being pressed. 

$00C6 

The byte at this location shows how many characters are 
currently stored in the keyboard buffer, up to a maximum 
of 10 ($0A). When you press f7 to enter a new address, 
this byte is automatically set by Scanner to SOO. 

$018D 

This location contains SOI if the SHIFT key is pressed; 
S02 if the COMMODORE key is pressed; and S04 if the 
CTRL key is pressed. 

$0400 

Locations $0400-S07E7 are the screen RAM. They con- 
tain a coded representation of the current screen display. 
You can examine the screen codes that form Scanner's screen 
display by scanning through this area of memory. 

$0801 

Location S0801 is the beginning of the BASIC program 
area. With Scanner, you can examine the tokens and ASCII 
characters that make up a BASIC program. Load or type 
in your BASIC program, then load and run Scanner and 
scan through this area of memory. 

$A004 

Locations $A004-SA00C are part of the BASIC ROM. 
These locations contain the ASCII message CBMBASICO. 

$D808 

Locations SD808-SD80C are part of color RAM. Only 
the low nibble (lower four bits) of these locations is signif- 
icant, since a four-bit RAM chip is used for color RAM. 
The low nibble of all five of these locations will normally 
be $0, because the color of the graphics characters that form 
the top of cell $D80C is black, and the code for black is 
0. Pressing f7 changes all the low nibbles to SC, because 
the color of the graphics characters that form the panel is 
medium gray, and the code for medium gray is 12 (SC). D 
SEE PROGRAM LISTING ON PAGE 91 
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1541 DISK DRIVE 
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WM COMMODORE 
DISK DRIVE 



FREE HOME TRIAL 



'with purchase of our specially priced software 



EMPLOYEE OF THE MONTH 

PAUL TARARA 

TECHNICAL SUPPORT MANAGER 




DISK DRIVE 



mm 

COMMODORE 

5159 
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QUESTION: What is the major strong point of the 
Commodore 64? 

ANSWER: It's the best beginner computer on the 
market today, no other computer has 
more software available for people just 
starting out. 
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BAUD 



MODEMS 
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COMMODORfr'^' 



$110 

II ^Jncludes 



1200/300 100 CPE 
BAUD l^^Zl' 



CALL TODAY 

OPEN 7 DAYS 
A WEEK & 
EVENINGS 



1-800-345-5080 
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EOS 
NCLUDED 



COMPUTER 




$139 

with purchase of 
disk drive package 



C-128 



COMPUTER 




with purchase of 
computer stand 



C-64 COMPUTER 




[with purchase of our 
specially priced software 



B7feEIK0SHA 

IR 1*^^*^ Letter Quality 

10^149 

I %^ Includes Interfacel 



PRINTER 



FREE TRIAL PERtOD 

300 tlOOCPSDrafI 

in CO CPS Near Letter Oualily Mode 

' 'wllh purchase of printer kit 




COMMODORE READY! 






IBM COMPATIBLE 





• 640 K Ram 

• MS-DOS' 32 

• Two ■ 360K DSDD 

• PC-XT- Compatible BIOS- 

• Cerilronics- Parallel Pon 

• RS-232 Senal Pon 

• 5 FuH-Size Expansion Siols 

• CompalpbiB 10 Support 40 MB Hard Diiue 

• PHONIEX-BIOS 

• ATI Graphics Solutions Aaaple'" — Buiii-m 
monochrome and color <tispJay card 
compaliOie with IBM • CGA- anflMDA- 
Hercules" and Ptantronics' video modes 
•MONITOR ADDITIONAL 



5749 

Less — $150 

(with trade in) 

$599 

FREE SHIPPING! 



Trade in your working 

C-64 and 1541 Disk 

Drive And Receive a 

S1 50 REBATE! 



CALL TODAY 
AND ASK FOR 



(( 



THE CLONE KILLER 



256K RAM EXPANSION 



FOR 

YOUR 

COMMODORE 

C-64 c-128 AMIGA' 




$149 



ea. 



1764 



1750 



Expansion 

Module 



FREE TRIAL PERIOD 



PRINTER 




FREE TRIAL PERIOD 



For Your 
Commodore 



QUICKDEUVERY^ 



WB 



VISA 



\cM. 



SCHOOL P O s ACCEPTED 



PRO-TECH-TRONICS 

6360 Shingle Creek Parkway :2Z1 

Minneapolis MN S5430 

Customer Assislance I61ZI S60'6603 

Technical Services (6121 561-3934 



Reader Service No. 130 



SOFTWARE 



LIMITED 
SUPPLY 

(NO DEALERS) 




ALL SIX 
PIECES OF 
SOFTWARE 



1. English II 

2. Math II 

3. Science II 



4. Triad 

5. Pilot 

6. Fish-Metic 



SHIPPING! 




SIMULATORS 





GUNSHIP 
GOLF 



F-15 JET 



cc 



PRO-SPORTS 




LEADERBOARD 




WRESTLING 



TAG-T 



EAM 



I2^BI 



WORD PROCESSING 





For 
Cof 



WORDWRITER V wea.JERM PAPEF 
WITH SPELL CHECK WRITER 



POWER 
SUPPLIES 
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opcom, peanuts, hot dogs-the crack of the bat 
1 and die roar of the crowd -a runner heading 
for home in a race against an outfielder's accur- 
ate arm -now that warm weather is here the 
main topic of conversation is the national pastime, baseball. 
Beater Up! is a one-player baseball simulation for the C-64 
which will sharpen your batting eye against a clever compu- 
terized pitcher. The game features a split-screen playing 
field, joystick control, and an optional printing routine for 
making hard copies of lineups and batting averages. The 
game is written entirely in BASIC with numerous REM 
statements, so you can see what's going on with the program. 

GETTING STARTED 

Type in and save a copy of the program, then RUN it. 
The screen will prompt you for the name of your team. 
Next, the screen will ask you for a name for the computer 
team. Pressing the return key at either prompt will name 
the team, with the default name Pittsburgh for you and New 
York for the computer. The screen will then show you your 
batting order with the player's batting average next to his 
name. The batting averages are different each time the game 
is played. You then have the option of making a hard copy 
of the lineup and averages (on a 1525 or equivalent printer). 

The playing field is drawn next. A split screen is used, 
with a batter on the left and an overhead view of the stad- 



ium on the right. The effect is that of watching a game on 
TV with one camera behind the catcher and another cam- 
era on the roof of the stadium. You are the visiting team 
and thus bat first. A bell will sound when the pitcher is 
ready to throw a pitch. The pitcher will go into his windup 
and throw the ball toward home plate. You have the choice 
of either taking the pitch or swinging at the ball by press- 
ing the fire button on a joystick in Port 2. 

The computer pitcher throws five different pitches. The 
ones outside the strike zone cannot be hit. When you hit 
the ball any number of things can happen, just as in real 
baseball. The player's batting average has a lot to do with 
it. For example, a player batting ,340 has a better chance 
of hitting a home run than a player batting .180, but the 
,180 hitter will still occasionally drive one out of the park. 

The game plays just like regular baseball, with one ex- 
ception—if a player is walked, then any other runner on 
the basepaths moves up one base. Thus, a walk is the same 
as a single. The balls, strikes, outs, and inning are displayed 
on a small scoreboard on the left of the screen. The score, 
batter, and batting average are displayed on the large score- 
board on the right of the screen. The runners currently on 
the bases are represented by X*s on the bases on which they 
are standing. The result of your hitting the ball is displayed 
on the right of the screen. 

After your team makes three outs, the computer's results 
for that inning are displayed and it is your turn to bat agab 
in the top of the next inning. The computer may score fipom 
to 3 runs in each inning. Since the computer is the home 
team, the computer gets "last bat." After nine innings, the 
game is over. 

STRATEGY 

When first playing the game you should take some pitch- 
es so that you can see what the pitcher is capable of throw- 
ing. After a while you will be able to differentiate between 
the various pitches and will be able to see a strike coming. 

Sometimes you will have a powerhouse team with high 
averages, and will probably want to swing away. In other 
games you might have a team with low averages, and you 
may want to take more pitches. Usually, you will have a 
lineup with a mixture of batting averages and you will want 
to manage accordingly. 

The game moves along feirly fast; you will have to make 
quick decisions. In this game you have to be the batter and 
the manager. Now, the only remaining question is this— 
Are the Mets going to repeat, or are the Pirates going all 
the way? D SEE PROGRAM LISTING ON PAGE 80 
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Using Interrupts for 



Swapping 

Why should anyone in this age of electronic 
remote controls need to switch the video 
monitor from 40 column to 80 column 
mode by hand? That is one of the ques- 
tions I have asked myself since I started using the Com- 
modore 128. 

The obvious answer is that we shouldn't. This month we 
will present a hardware/software project that eliminates the 
arduous burden of manually switching a "green screen" vid- 
eo monitor from one mode to the other. We will let the 
computer control an electronic relay to do the switching. 

For those of you with dual-mode Red-Green-Blue (RGB) 
monitors such as the 1902, this handwane will not solve your 
problem. Perhaps the ideas along with the software pre- 
sented here can be adapted for your system. In the mean- 
time, you must still reach up and press that switch on your 
monitor. 

Those of you who don't have a green-screen monitor and 
are not interested in controlling a relay with your compu- 
ter may at least find the discussions of programming with 
interrupts useful. 

We will set up an interrupt routine that 1) remains active 
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even after a RUN STOP/RESTORE warm boot, and 2) can 
coexist with other such routines. These are not trivial re- 
quirements, but they are not difficult to achieve. 

GREEN SCREENS 

If you use your C-128 for serious work (as opposed to 
serious game-playing), you should be taking advantage of 
the 80 column mode. The least expensive and in some re- 
spects the best way to use 80 column mode is with a "com- 




posite" monochrome video monitor, usually called a "green 
screen." 

These are monochrome displays with green or amber 
phosphore, and usually with very high bandwidth and reso- 
lution. The bandwidth is a measure of the sharpness of an 
image on the screen. A standard television set may have 
a bandwidth around three or four megahertz. It is not un- 
common for a green screen monitor to have a bandwidth 
of twelve or fifteen megahertz. The higher the bandwidth, 



ILLUSTRATION: TOM CU5HWA 



the sharjjer the image. 

The electron beam zooming across the screen is turned 
on and off at appropriate times causing some phosphors 
to glow and others to blank, thus generating the video im- 
age. Low bandwidth circuitry simply cannot turn the elec- 
tron beam on and off quickly enough to show the individual 
pixels of 80 characters per line. You must squint and use 
a lot of imagination to read 80 column text on a television set. 

In addition to TV sets and green screens, there are RGBI 
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(red-green-biue-intensity) monitors, usually called RGB 
monitors. To get high -resolution text and multiple cotors, 
you need one of these "direct input" monitors. The RGB 
monitor is much more costly than a green screen. Text on 
a $600 RGB monitor will be almost, but not quite, as sharp 
as text on a $100 green screen. Text on a $300 RGB mon- 
itor is not nearly as clear as on a green screen. 

The C-128 takes very limited advantage of its RGB cir- 
cuitry. (Ever try to draw red, green, or blue circles in 80 
column mode?) This may sound like heresy, but it seems 
a waste to attach an expensive RGB monitor to the C-128. 
Why? Because the C-128's RGB output (80 column mode 
in BASIC) only supports text, and a green screen is better 
than an RGB monitor for text. 

What's the best solution? If you use your C-128 computer 
primarily for programming and vreird processing, get a gneen 
screen. Period. If you also want to play games or generate 
color graphics, get a separate color composite (not RGB) 
monitor, such as the 1701 or 1702, or use a television set. 
Another possibility is to use one of a new breed called a 
'lelevision/monitor" which allows you to bypass the RF (ra- 
dio frequency) circuitry. (In general, the RF section limits 
the sharpness of the image.) 

The C-128 allows you to select either the 40-column out- 
put or the 80-column output. With this month's project, the 
computer will automatically route the selected output to the 
green screen. 

THE HARDWARi 

Building this project is a straightforward task. Refer to 
the schematic diagram on page 36. The Parts List on this 
page includes Radio Shack numbers in parentheses. There 
are many other sources for these parts. If you use a relay 
different from the one listed here, you may need a differ- 
ent value of resistor. We will discuss that later. 

You may use any method to assemble the project. Prob- 
ably the neatest and easiest is to use a pre-drilled and -etched 
universal printed circuit board such as the one with the box 
in the parts list. 

Refer to the Assembly Tips on page 40 to help with the 
construction. Be sure to figure out how to fit all the cables 
and components in the box before you begin soldering things 
together. Also determine the placement of the parts on the 
printed circuit board, if you use one. 

The relay is an electrically controlled switch attached to 
the cassette motor driver. When the computer is first nimed 
on, there is no power supplied to the relay coil, and the 
relay switch is in the Normally Closed position. This brings 
the output fix)m the 40-column Video port to the video mon- 
itor. If the C-128 is used in C-64 mode, the relay is not 
powered, and the 40-column output is selected. 

To bring the 80-column signal from the RGBI port to 
the monitor, power must be applied to the relay coil. It be- 
comes an electromagnet which pulls the switch from its 
Normally Closed position to the Normally Open position. 
You can hear a click as the relay switch changes positions. 

Power is brought to the relay coil from the motor driver 
circuit of the cassette port. Software controls the state of 
that circuit. Software that normally turns on the cassette 




PARTS LIST 

Relay (275-240)*: SPDT, 5 VDC, 90 mA 
Resistor (271-005)*: 22 ohms, W or 1/2 wan 
Diode (276-1122): 1N914 or equivalent switching diode 
Phono plug and cable (42-2371): 6" coax with one plug 
DIN plug (274-003 or 274-020): 5 or 6 pin male 
Sub-D plug (276-1537): 9 pin male ■ 

Sub-D hood (276-1539): to fit 9 pin plug 
Card-edge socket* (part of 276-1551): 0.156" 12 pins 

Optional; 

Box and circuit board (270-283): enclosure and univer- 
sal etched and drilled printed circuit board 

(Radio Shack part numbers are shown in parentheses) 
*Refer to the article for details 



motor now energizes the relay. 

The diode is an important part of the circuit. Be sure 
it is connected properly. Do not use the circuit without it! 
The relay generates a voltage surge whenever it is deener- 
gized. The diode keeps the surge from damaging the driving 
transistor inside the computer. 

If you use a relay different from the one listed, you may 
need a different value of resistor There are two types of 
ratings associated with a relay: the coil rating and the con- 
tact rating. The contact rating tells how much current can 
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be safety switched by the relay (typically 1 or 2 amps at 
125 volts AC). The video signals we are switching are very 
small compared to the maximum allowed contact ratings 
of most relays. We are only concerned with the coil rating. 

The coil rating tells the nominal voltage and current re- 
quired to make the relay coil operate. The relay in the parts 
list has a coil rating of 5 volts DC, 55 ohms resistance, 
and 90 milliamps of current. Actually you need only any 
two of these numbers. The third is found from Ohm's law: 
V = I * R where V is voltage, I is current in amps, and 
R is resistance in ohms. Verify that 5 volts approximately 
equals 0.090 amps (90 milliamps) times 55 ohms. 

The output of the cassette motor circuit is nominally 6 
volts, though it could be close to 7 volts. Use a relay with 
a coil rating of 6 volts or less. For a conservative design, 
we'll assume the motor output voltage is 7 volts. With a 
nominal 5 -volt coil relay, the remaining 2 volts from the 
cassette port must be dropped across a resistor. 

The value of the resistor is calculated from Ohm's law 
since the voltage across it is known (7 volts minus the re- 
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lay coil voltage) and the current through it is the same as 
the current through the relay coil. 

Assume you use a relay with a nominal 6 volt coil which 
needs 100 milliamps to turn on. There will be 1 volt across 
the resistor (7-6=1). The current through the resistor 
will be 0.1 amp (100 milliamps). Therefore the value of the 
resistor must be 10 ohms (1 volt / O.I amp = 10 ohms) from 
Ohm's law. Only certain values of resistors are available. 
If your calculated value is not available, choose the next 
higher value. 

A relay will not reliably turn on if the resistor value is 
too large, since there will not be enough current through 
its coil. If the value of the resistor is too small, too much 
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current will flow, possibly damaging the relay and the cir- 
cuitry inside the computer. 

The only other hardware concern is the power rating of 
the resistor. Resistor power ratings range from fractions of 
a watt to several watts. To calculate the minimum power 
rating of the resistor, multiply the resistance times the square 
of the current: P = 1 + 2 * R. 

For the resistor in the parts list, current is 0.090 amp and 
resistance is 22 ohms, so its power consumption is 0.18 watt 
(0.09 ♦ 2 * 22). We must use a resistor with a power rat- 
ing at least this great, so W watt or larger is the proper 
choice. A V4 watt (0.125 watt) or smaller resistor cannot 
dissipate heat rapidly enough for this circuit and may even- 
tually bum out. 

Now let's look at the software to control this hardware. 

THE SOFIUVARE 

We want the software to have the following characteristics: 
1. It must continuously check the display mode of the 
computer (40 or 80 columns). 

2. It must turn the cassette motor 
output on when the computer is in 80- 
column mode and must turn the motor 
output off when in 40-column mode. 

3. It must be loaded once and remain 
active without interfering with other 
programs. 

4. It should not be disabled with a 
RUN STOP/RESTORE warm boot. 

The first and third requirements im- 
ply the use of the IRQ (Interrupt Re- 
Quest) interrupt routine. The compu- 
ter executes the IRQ routine every six- 
tieth of a second. The normal IRQ rou- 
tine does such things as update the jif- 
fy clock and scan the keyboard. It is 
possible to patch our program into the 
IRQ routine so that it will check the 
video mode and set the relay accordingly. 
When an interrupt occurs, the com- 
puter calls the subroutine whose ad- 
dress is stored in RAM locations S314 
and $315 (hex). The normal IRQ rou- 
tine address is $FA65. We will put the 
address of our program into l(x;ations 
$314 and $315. When the interrupt oc- 
curs, the computer will then call our program. Our program 
will conclude by sending the computer on to the original 
IRQ routine. This is a process called "wedging." We will 
wedge our program into the normal interrupt sequence. 
Requirement number four is the trickiest constraint. Nor- 
mally the warm boot routine rewrites the original IRQ ad- 
dress {$E^65) into locations $314 and $315, breaking the 
link to our program. After that our program would no long- 
er be executed by the interrupt routine. 

A standard solution is to tell the user to enter a SYS com- 
mand after a warm boot. This would execute a simple ma- 
chine language routine to replace the vector at $314/$315 
with the address of our program once again. 
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Monitor 

ADD <130 



•Commodore 128 Computer 
•Commodore 1541 Disk Drive 
•12" Monitor 
•Commodore Color Printer 
95 



$499' 



To substitute 1571 for 1541 
add 165.0° 



\r V£Qm. PACKAGE 




■Commodpre 128 Computer 

•Commodore 1571 Disk Drive 

•Commodore 1902 Color 

Monitor 

• Commodore 80 Column 

Printer 

$759" 



WE CARRY A FULL LIME OF SOFTWARE ™"""«"""»f ^"x™™^"^ 



DISCOUNT PRICES! Call Toll Free to Order 



COMPUTER PRINTERS 



PERIPHERALS 



^K commodore 

129'* 
199" 
229" 




EPSON 




i\ HOME- 
■V WRITER 10 
ith 
Interface 



«. 



189 



95 



LX-16 Primer 1219.95 

FX-ae Primer 1349.95 

FX-216E Prirtler 1469.95 

LQ-800 Printer 1469.95 

PANASONIC 10801 118995 

OKIDATA 

OKIDATA 120 PRINTER....I199.95 

OKIMATE 20 

with PliB'i'Prim »!M.95 



^Sl^r 



POWER TYPE 

Daisy Wheel 
Letter Quality 



NB24-10 1469 95 50-15 1399.95 

NB24-15 (669.95 NO-15 »419.9S 

SG-IOC 117995 SR-IO (429.95 

NX-IO IU9.95 SR-IS (469.95 

NX-IOC (199.95 NR-IS 1499.95 

NX-IS (309.95 NB-15 tS69.95 

SD-10 .1249 95 

NL-iq w/Cammodort Cart (249.95 





^ClS41C 

' " new Disk Drive 

$165" 

Cz 1541 

Disk Drive 

$149" 



Disk Drive 



r 1 ^-' ISD^ RGB 

I ^- Color (0/1095 
^^^J[ Monitoi 



$214" 

IGB 

,,$249' 



BLUE CHIP IBM' PC COMPATIBLE 

512K Ejipandsbk la 640 K 
6 Expansion Slots 
Optional 20MB Hard Drive 
Blue Chip Keyboard 



I Disk Drive 



$579 



95 




Cm 1802 
* Color 



Monitor 



$189 



95 



GEOS Software (34 95 

TU-803 $34.95 

XETEC Jr Interface (39 95 

XETEC Sr interface (59 95 



C, -MAGIC VOICE" ^AQ95 
" Module ^f^ 

Qi 1670 Automodem €100^5 

$44" 

$99" 
$169" 



^S 1351 "Mouse" tor 
any Commodore 
Computer 

C' 1700 128 K 

Expaiision Module 

^S 1750 S12K 

Expansion Module 



WE REPAIR YOUR 

COMMODORE COMPUTER 

artd PERIPHERALS! 

C-M,C-H/C t3).95 

C-I2> m.K 
C-I541/1S41/C Drivil 145 

MPS-aOt,rt<PS-(0] Prlaltn t»M 

r^PS-lODO.MPS-lJOO Pfinlni t<9.tS 

C- 1702,111)2,1)03 UDnlton H<.)S 
90 D»y W4it»rtrf on lit Itpiift4 mttthtndiit 



C128 Power Supply 
C64.C64-C Power Supply 



139 95 
(2995 



r-'TMl^ 



WE INVITE CORPORATE 
ii EDUCATIONAL CUSTOMERS 



llbta loi 1yP'0[l 



Header Service No. 127 
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Cadpak 




Super Pascal 

Your complete system for developing 
applicationsin Pascal. Acomplete implemen- 
tation of standard Pascal (Jensen and 
Wirth). C-64 version has a high-speed DOS 
(3X) for quicl< and efficient use The 
extensive editor (source induded) contains 
added features: append, search and 
replace. Includes assembler lor any of your 



Design pictures and graphics quickly and 
precisely. Unlike other drawing programs, 
you can produce exact scaled output on 
your printer. Design in the units ot your 
drawing problem (feet, miles, meters, etc.) 
and send hardcopy to most printers. Uses 
eitherthe keytioard, lightpen or 1351 mouse. 
Two separate work screens — transfer 
artwork from one screen to the other. Place 
text in four sizes anywhere in the 
picture — three extra fonts included: Old 
English, 3-D and Tech. "Try Again" allows 
you to undo mistakes. Draw solid or dashed 
lines, drdes, ellipses at any angle, rays and 
boxes. Design fill patterns, fonts and 
objects. Cadpak is the full-featured design 
and graphics package for your computer. 
for C-64 $39.95 torC-128 SS9.95 




BASIC Compiler 

Now anyone can speed up their BASIC 
programs by 3 to 35 times! Basic-€4 and 
Basic- 128 easily converl your programs into 
fast machine language or speedcode (takes 
up less space yet protects your programs 
from prying eyes) or a mixture ot both. You 
can even compile programs written with 
extentions— Simon's Basic, VICTREE, 
BASIC 4.0, VideoBask; and others. When 
the compiler finds an error, it just doesn't 
stop, but continues to find any otfier errors 
as well. Supports overlays and has many 
other optrans. 128 version works in FAST 
mode and allows you to use all 128K of 
memory. It your program walks or crawls, 
give it the speed to RUN! 
for C-64 $39.95 lor C-128 $59.95 



machine code' requirements. Used in 
hundreds of schools to teach programming 
and also used for serious development 
projects. But it can be used lor more than 
just learning Pascal, use it lor serious 
programming. With complete graphic library 
(source induded) in machine language for 
super-fasl execution. Want to learn Pascal 
or develop software using the best tool? 
Super Pascal \s your first choice, 
for C-64 $59.95 for C-128 $59.95 



"...everything a good compiler should 
be...easy lo use...efficienl...offers a sood 
range of optional features, ..excellent 
documentation. ..inej^nsive." 
Tom Banford, Commodore Magazine 



BMC 



Give your 
BASIC programs 
a boost! 



. . . and SUPER BOOKS! 





GEOS 

WiSIDC 

AND OUT 





AnMiomy d ttt* C-^ 
Insiders guide to "64 intemab. 
Gfaphics, sound, I/O. kernal, 
fn»mory maps, and mijcK 
mors. ComplAlB comm»nl«<f 
ROM listings. 300pp St9-95 



Anatomy of thHS41 Dt1v# 
QesI hanObock on Ihis drva. 
AKplains all. Filled wilti many 
9Kampl«s programs, ulititios- 
FuiTy comfn*m«J 1541 ROM 
(istir^s. BOOpp $1*95 



Trtckt « T^t forth* C-U 
Coiilactton or easy-to-UM loch* 
niques: advanc«d graphics. 
Improved data inpul, CP/M, 
onhanoftd BASIC, data hand- 
ling and mors. ZTfipp $19 95 



QEO^ matdo »nd Out 

Dslaiied inio on GEOS. Add 
your own applications to 
GEOS Edit icons. Conslant 
display clock. Singie-sl«p 
ttirgiigh nwmory. $13.95 



GEOS TrtckM and Tip* 

Collection of r>«iptul lech- 
niqu&s lor all GEOS u»r5. 
Includes font sdrtor, machin* 
language monitor, quick 
badujp. more St9,9S 



_rojiwo29iL<| ^'F 



Dg© 



INTERNALS 




ifltiasaato CrifS 






1571 INTERNALS 




"« 







PEEKS 4 POKES 



o-» r^ *-0 



AbKlul 






tl^i 



BASIC 7.0 
INTE RNALS 




Abicu^^g^.S 
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C-12e fNTERNALS 

Important C'12a information. 
Covers graptic ct^ips, MMU, 
[^:>, SO column grapt>ics and 
fully commcintttd ROM 
llStngs, mor«. SOOpp S13.AS 



1S71 INTERNALS 

Essential reterenu Internal 
drtv« fgnctions. Explains 
various disk and lite formats. 
Fully-commantfld ROM 
listings. 450pp S19 95 



C'128 miCKS & TIPS 

Fascinating and practicai info 
on trie C-126. 80-col hires 
graphics, bank switching. 
300 pages of useful Inform- 
^bn lor everyone. S19 95 



C-lSe PEEKS i POKES 

Dozens ol programming 
quic^-tirtters. lectiniques on 
the operating system, slacks, 
zero page, pointers, and 
BASIC. 24Clp(> $16.95 



C-12S BAStC 7.PInl9mats 

Gel all the inside Info on 
BASIC 7 0. This exhaustive 
han<»jook is conplete with 
fully commented BASIC 7.0 
ROM letings. S24.95 
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A Complete Pro Football 

Prediction Program For The 

1987 NFL SEASON 




51 ^ + Accurate vs 'Line' in 1986 



More In 
'87 To . 



• • 



FEATURES 



Predicted Scores Each Week 

Season Schedule By Week 

Season Schedule By Team 

Scores By Week 

Scores By Team 

Win Loss Record Home/Away 

Division Standings 

Stats — Accumulated & Average 

Line By Week 

Line By Team 

Record vs Line 

Record vs Common Opponents 

Individual Team Match-Ups 

Printed Copy All Screens 

1983-1986 Data Base 

{Includes All of the Above) 

Easy Updates Playofts/1988 

Not Copy Protected 

Dealer Inquiries Invited 



BEAT THE SPREAD 

74 



• • 



O C INCLUDES DISK AND 
^3 DOCUMENTATION 

SPECIFY 5'/, OR 3V': DISK 

IBM, Tandy & Compatibles 
Commodore 64—128 
Apple 11+ — ftc — lie — llgs 
IRS 80 Mill / IV 



Stats Needed To Run Program Available In 
Local Newspapers Or We Will Furnish All Stats 
By 1st Class Mail. Season Price 40°°. 

Our Bylletin Board Will Furrrish All Stats, Lines, 
Predictions and Trends Updated Daily. Season 
Price SB"". Program Comes Updated Thru Current 
Week of Season ... No Extra Charge. 




ORDERS SHIPPED IN Z DAYS 

PHONE LINES OPEN 24 HRS. 

ADD 3™ SHIPPING & HANDLING 



TOLL FREE - 800-722-2277 
TEXAS COLL. - 214-586-8212 



Marathon Software Dept. A 

p. 0. BOX 1349 - 641 FORT WORTH ST. 
JACKSONVILLE. TEXAS 75766 

TOU. FREE I COUiCI FOA OtOEtS aNlIT 
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We don't want a standard solution. We want the warm 
boot routine itself to put our program's address into the IRQ 
pointer at $314/$315. The secret to doing this is derived finom 
the book Commodore 128 Pmgmmming Secrets by Williain 
Wiese, Jr. (Osborne McGraw-Hill). 

During the warm start sequence (but after it has rewrit- 
ten the IRQ vector), the computer jumps to the address con- 
tained in the SYSTEM_ VECTOR in RAM locations SAOO/ 
$A01. Normally this is the BASIC warm start routine at 
$4003. All we need to do is replace the S4003 at $A00/SAOI 
with the address of our own initialization routine. 

Our initialization routine will restore the IRQ vector to 
point to our main program. It will also check the 40/80 
column mode and set the relay to select the proper video 
output. Then our initialization routine will continue with 
the normal warm start sequence at $4(X)3. 

PEACEFUL COEXISTENCE 

One final but very important consideration is that our 
IRQ wedge should be able to coexist with other programs 
which use the IRQ vector or tne SYSTEM_VECTOR. 
How many times have you loaded a utility only to find that 
another utility in memory now no longer works? There is 
no reason for such a thing to happen if both utilities are 
written properly and if they are not stored in the same mem- 
ory locations. 

The simple solution is to read and save the vector you 
are replacing rather than merely to assume the defeult vec- 



tor was there. An example will clarify this. Locations $314/ 
$315 normally contain the address $FA65. Assume we have 
two programs which are both to be wedged into the IRQ 
routine. PI resides at address $1400 and P2 at $1500. 

If PI were an inconsiderate program, it would simply put 
its starting address at $1400 into $314/$315 and its last state- 
ment would be IMP $FA65, If P2 were also an inconsiderate 
program and were loaded next, it would put S1500 into $314/ 
$315. It thereby overwrites the $1400, and PI is no longer 
called by the IRQ routine. If you reinitialize PI, then P2 
no longer works. 

Here is how the two programs should be written. PI reads 
the value in S314/S315 and saves it in a variable called PIVEC, 
for example. Assume the value it read is the defeult value 
$FA65, so PIVEC equals $FA65. 

PI then stores its own main routine starting address 
(S1400) at $314/$315 so the interrupt routine will call PI. 
The last statement in Pi's main routine would be J MP 
(PIVEC), that is, "jump to the location whose address is 
stored in PIVEC." This is equivalent to JMP $E\65, just 
as before. So far, so good. 

Now load and initialize P2 the same way. P2's initializa- 
tion routine reads the value in $314/3315 and saves it in vari- 
able P2VEC. This value is not the default value $FA65. In- 
stead it is the starting address put there by PI, so P2VEC 
equals $1400. 

P2 wedges its main starting address ($1500) into $314/$315. 
The last instruction in P2's main routine is JMP (P2VEC). 

AHOYt 39 



ASSEMBLT TIPS 

!. Cut off two eight-inch lengths from the free end of 
the coaxial phono plug cable. Strip the outer casing back 
about '/z inch from both ends of each of the two pieces 
and at the severed end of the original cable. Be careful 
not to cut very much of the shield wires. Strip the inner 
insulation back about % inch from each end. Twist each 
of the braided shields. 

2. Solder the inner wire of one 8-inch piece of cable 
to pin 7 of the 9-pin D connector. Solder the twisted 
braid of that piece to pin 1 of the D connector. Label 
the other end of that wire "NO". {See Step 4.) Solder 
the inner wire of the other 8-inch piece to pin 4 of the 
DIN plug. Solder its braid to pin 2 of the DIN plug. 
Label the other end of that wire "NC. 

3. Twist and solder the diree free braids together (two 
from the 8-inch cables in step 2 and one from the orig- 
inal phono plug cable). You may want to tie-wrap the 
three cables together. 

4. The inner wires of the three cables are attached to 
appropriate pins on the relay: the inner wire of the 9-pin 
D cable goes to the Normally Open (NO) terminal, the 
6-pin DIN cable inner wire goes to the Normally Closed 
(NC) terminal, and the phono plug inner wire goes to 
the Common (COM) terminal of the relay. If there is 
more than one Conunon terminal, it may go to either one. 

5. The cathode end of the diode goes to one side of 
the relay coil and also to one end of the resistor. (The 
cathode end of the diode is marked with a stripe.) 

6. If you use the 44-pin card-edge connector (0.156 
inch spacing) in the parts list, you must cut it to make 
a 12-pin connector. Just use a hacksaw and cut it through 
pin 7. (The longer piece of the connector can be cut again 
through pin 10 to make a 24-pin connector which fits 
the user port.) 

7. Cut two pieces of wire, one red and the other black, 
about eight inches long. Solder the other end of the di- 
ode (its anode) and the black wire to the other side of 
the relay coil. Solder the red wire to the open end of 
the resistor. Solder the other end of the red wire to pins 
C/3 of the 12-pin cassette port card-edge connector. Sol- 
der the black wire to pins A/1 of the 12-pin card-edge 
connector. 

That's all there is to it. The 9-pin D connector goes 
to the RGBI port, the circular DIN connector goes to 
the Video port, the 12-pin card-edge connector goes to 
the Cassette port on the C-128. The phono plug goes to 
the video monitor input. 

What does this do? It causes execution to continue at ad- 
dress $1400, so now PI will also be executed. All properly 
written IRQ wedges will be executed, but opposite to the 
order in which they were loaded. 

Any number of IRQ wedges can be implemented this way 
The only constraint is that the routine obviously must not 
occupy the same memory space. One may have to be relo- 
cated if they overlap. 

The same concepts apply to programs which are to be 



wedged into the warm start routine through the SYSTEM — 
VECTOR at SA00/$AD1. Let's put these principles to work. 
Look at die assembler listing SCRNSWARASM on page 
83 for the following discussion. The program has three 
separate entry points, the Initialization (line 13), the warm 
boot Restart (line 39). and the Main routine (line 62). The 
Initialization is called from BASIC when the program is 
first loaded. The Restart is called after a RUN STOP/RE- 
STORE reboot. The Main program is called every sixtieth 
of a second by the interrupt routine. 

The initialization routine begins at address S1500. Vari- 
ables KRQVEC and SYSVEC in lines 157 and 158 will store 
the values read from the IRQ pointer at $314/5315 and the 
SYSTEM_VECTOR pointer at SADO/$AOI. The initializa- 
tion will be executed by a SYS 5376 or SYS DECCISOO") 
statement in BASIC. 

Lines 115 through 118 determine if this initialization has 
already been executed. If so, it is not repeated. If not, lines 
120 through 122 read the IRQ vector from $314/5315 and 
save it in IRQVEC. Lines 124 through 127 save the SYS- 
TEM_VECTOR in SYSVEC. 

Lines 129 through 132 wedge the starting address RE- 
START of the warm boot portion of the program into the 
SYSTEM_ VECTOR. CONFIG at Une 142 is called to read 
and save the current video mode, initialize the relay, and 
wedge the MAIN routine into the IRQ vector. The initiali- 
zation portion of the program is done, and it returns to 
BASIC in line 135. 

Now the RUN STOP/RESTORE warm boot sequence will 
branch to our program beginning at address RESTART in 
line 140. The RESTART routine calls CONFIG beginning 
at line 143 to determine the video mode, to initialize the 
relay, and to wedge the MAIN portion of our program into 
the IRQ vector. Finally in line 141 the RESTART routine 
jumps to the vector it previously saved in SYSVEC. 

The IRQ vector points to our MAIN program at line 162. 
This program is executed every sixtieth of a second. The 
program compares the previous video mode saved in vari- 
able PREVMD to the current mode. The current video 
mode is indicated by bit 7 of location $D7 (MODEFLG). 
If this bit is 1, 80 column mode is selected; corresponds 
to 40 column mode. The current mode is saved in line 167. 
If the current mode is the same as the previous mode, the 
routine exits in line 171 to continue with the normal IRQ 
routines. 

If the video mode was changed during the previous six- 
tieth of a second, line 169 branches to the RELAY routine 
at line 174. Lines 175 through 182 perform an initialization 
so diat the motor output of the cassette port can be changed. 
Line 183 decides if the relay should be turned on for 80 
column mode or off for 40 column mode. 

If 40 column mode is selected, the relay is turned off. 
Also the 40 column display is turned on by setting bit 4 
of the VIC control register at $D011. A zero is stored in 
the processor clock rate register to put the computer into 
SLOW mode. 

If 80 column mode is selected, the relay is turned on. 
The speed of the computer is not changed. This allows the 

Continued on page 60 
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ACTION IN 
OUTER SPACE 

The Hottest Science Fiction 
Arcade Software 



By Arnie Katz & Bill Kuitkel 



When the cares of the world hang 
heaviest, there's something invigorat- 
ing about an unabashed shoot-em-up. 
Even an ardent adventure gamer can 
be coaxed away from parser-pounding, 
at least temporarily, by the speed, the 
sounds, and the excitement of a rous- 
ing science fiction blastathon. 

The sedate Pong was the very first 
computer game for the masses, but it 
didn't take space action games long to 
blast into the public consciousness. A 
solitaire contest in which the player 
shot at a pesky flying saucer with a 
spaceship cannon was raking in quar- 
ter at amusement centers within a year 
after the Pong craze hit. 

The years 1984-1986 weren't gener- 
ous to fens of action science fiction 
software. The much-discussed slump 
in real-time computer games hit the 
science fiction category especially 
hard. The public had always closely 
identified science fiction themes with 
the suddenly unchic videogames, and 
computer ftinware publishers didn't 
want guilt by association. 

It is axiomatic that when publishers 
stop buying a type of software, design- 
ers stop trying to create it. Authoring 
entertainment software is a career, af- 
ter all, and it's hard to make a living 
out of unsold product. 

In the U.S. , talents once devoted to 
the zap and pow of outer space combat 
turned to hot game themes like sports 
simulations and adventures. Science 
fiction action disks, which once 
seemed as numerous as the stars in the 




Starglider is a 
largely origin- 
al arcade ac- 
tion game. 
Vector style 
line graphics 
help enhance 
the sensation 
of moving at 
great speed, as 
well as free- 
falls and sud- 
den stops. 
READER 
SERVICE NO. m 



Milky Way, had become as rare as Mr. 
Spock's smiles by summer 1986. 

Help has come, not from across the 
firmament, but from across the Adan- 
tic Ocean. Britain's Videogame Era had 
a more modest boom and a far less dis- 
astrous bust. No one told U.K. pub- 
lishers, designers, and consumers that 
they should stop liking science fiction 
action programs, so they didn't. As a 
result, hundreds of SForiented joysdck 
jambourees have made their debut in 
Great Britain in the last two years. 

These new titles aren't just the same 
old reflex-testers, either. They reflect 
today's tastes in audiovisual effects and 
sophisticated play-mechanics. U.K. 
space battle programs not only look 
better than many of the science fiction 
classics, but most mix just enough 
strategy to keep play from becoming 
numbingly repetitive. 



Jeremy San's Starglider (Firebird) is 
a rarity among entertainment software 
products: a laigely original arcade-style 
shoot-out. This C-64 translation by 
Solid Image gives American computer- 
ists a chance to enjoy a program that's 
already been a smash in England. 

Starglider is an innovative first-per- 
son space combat contest. Although it 
visually resembles vector graphics 
games, and it shares some elements 
with Battlezpne and Stellar 7, the total 
package is remarkably fresh. 

The game begins when the player's 
AGAV (Airborne Ground Attack Vehi- 
cle) zooms into the fray at near-light 
speed. The AGAV is capable of out- 
running anything your Alliance. Egron, 
or Aruloid foes can send after it, short 
of light-speed vehicles. 
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64c $149*^' 

128 $229*" 

128D sCALL 

*pack«g« pricing 




1581 .TT7. $CALL 

1541c $169" 

1571 $219»' 





300 BAUD.... *2800 

OKIMATE 20...* 18000 

1351 53995 

IS01 mS:^ct,rom.)....iQ9'^ QUANTUM LINK... *2 

1802c $199*^ I **%«• ■ 

1902A $249" I 1764 RAM.... *C ALL . 
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95 



Power Type $159** 
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*229 
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NX- 15 
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I 'WITH PURCHASE OF TWO RIBBONS | 



knriita 



-433-7756 



ORDERS I 
ONLY 
CUSTOMER SERVICE 313-427-0Z67 

HOUN IE.1.T.I: 
ttn fhin - 10:00 A.M. m S:00 P M. 
SMwfcv - 10:00 *.M. U 8:00 P.M. 



SIDECAR NOW AVAILABLE...$700 





500 h:all 

1000R.„.*500«>* 



1000 (new)... *65000 



GENLOCK $225'"' 



1680MDnfw $120'*' 
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256K 



$800° 
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EUTUflE SOUND '125 


SMEO 
20 MEG 


•40000 
•80000 








MARAUDER II '24 


,«egS 


•380°° 


'HfllLfbHhBd btr Convnodn 
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ft commodore 

IBM COMPATIBLE 




• 512K 

• 360K Dual 

Sided Drive 

• CGABoafd 

• One year wnfranty 

• Parallel Port 

• Serial Port 

• GW BASIC 

• DOS 3.2 



SIDEKICK 
BY BORLAND 



PCI 0-1 OUAl 

^99 |640K 

»55O.O0Alan« -WitlipuidBaeql 190101902 A •8SOAIon« 
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PCI 02 

574 



95 



20 MEG...$350 Seagate 



30 MEG...$400 
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DEALER INOUIREES INVITED 



MICROCOMPUTER SERVICES 



*• Sutctaii lir HCIVUltMSCIIVfll SmynvMttatn 

Un>umiiiwl>»nRtJ Ihttlwda ImaiiJ Wactn W h l | ll 1 1 ■ tftlt. U mm 
■I !•• Hi do i»t gtfn fv^ If lifKhn inducii If ht prim 1M k M piriaa 
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iwii bi IH<W Aicllr mtk am amlKlvii (M la titeen I lanHng lib 
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Bills TUc . «».«) 

□Hssnastif 2000 . 30.00 

LwOs 01 Coogunl 21.00 

HUM HMiss 2«.00 

P**isii5 1B.0O 

MKtw$ 24.00 

■' ' iPvti . 21.00 

Ojte 2100 

Ubiu M X 00 

UUnM WuxH 24.00 

Bnl'j THe II 2tm 

/MiDMi 30.00 

ScHtHHc 21.00 

Amtnca's C(4i 2100 

titic Rx 21(10 

MINDSCAPf 

MhxIh gl la Cnun NEWt2i.DD 

1»«) 

F«t .1».I» 

SilMI Stir HnkM NEW 21.00 

rtivfldtof 18.00 

bidoor Spoil 1B.O0 

- \im 

Mum Prai«( iBjOO 

Fwtan ttm 

mmiurri HM 

LuKtK'Pmrm ttxo 

HirDBia *9^!^9f. Sp«J»H17 0O 

Hgn Wgn 1800 

OantuMn - 16 00 

Llw si Iht Wesi 18 00 

PSI 5 TrxlMO Conp 18 00 

WUnUDcm 18 00 

to 01 Acts 18 00 

Comka 18.00 

SupertMsc 1 28 $50 00 

SuiwbiseM , rtff 10 00 

Supencnpl t2B laBW" lODO 

GEOS StinMm.OO 

C3E0S Rjwpa* 1 IB.OO 

GEOSDMtPtck 21.01 

WnUi Wbrt SiBp. 30.00 

Geodn 21.X 

QHCalc/GHHt WW 3000 

GuCabk NEW 24.00 




Uridium: for carnage connoisseurs, 
READER SERVICE NO. 120 

The most exciting feature of the Star- 
glider craft, however, is diat it can save 
on fijel by gUding for great distances. 
To accomplish this, the pilot takes the 
AGAV to a decent altitude and kills the 
engines. This is not only an energy-sav- 
ing strategy, but it is also quite useful 
in attack situations. 

Starglider communicates the sensa- 
tion of moving at great speed, as well 
as sudden stops and freeM, better than 
any previous flying and shooting pro- 
gram. The vector-style line graphics, 
which convert objects to crystalline, 
three-dimensional sculptures, were an 
excellent choice to enhance this per- 
ception. Enemy vehicles and station- 
ary anti-aircraft batteries grow from 
simple points of light at ver^ high al- 
titude to beautifully articulated struc- 
tures as the AGAV dives toward them, 
as its "Sapphire IT quadpulse laser can- 
nons and "Starburst" proton missiles 
scream a deadly warning. 

The AGAV boasts some very impres- 
sive technology. It runs on plasma en- 
ergy, generated in its own onboard 
molecule expansion chamber, and is 
equipped with a "posilok" laser cell re- 
flieling nozzle on its nose. The console 
includes a local area scanner, energy 
level meter, shields, altitude meter, vel- 
ocity indicator, bank level indicators, 
plasma drive status display, heading, 
and missile indicator. 

But the AGAV's most fascinating 
gadget is its TGS (Television Guidance 
System). The AGAV can launch this 
camera for reconnaissance and contin- 
ue to hover in its current position un- 
til the camera returns. It scouts the ter- 
rain and simultaneously transmits those 
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pictures back to base. 

The backdrop for the action in Star- 
glider is extremely complex. The game 
comes with excellent documentation, 
including a k^board guide, instruction 
booklet, poster, and a novella, with- 
out which one can hardly tell tiie good 
guys from tiie bad buys. The latter are 
in plentiful supply, too. Confronting the 
player are not one, not two, but three 
enemy alien races! 

Fortunately, the program provides 
the gamer with the chance to get a 
briefing on the nature of the various en- 
emy vehicles and weapons. When the 
AGAV flies into any of the docking bays 
scattered along the hostile landscape, 
the gamer may run a quick visual tu- 
torial on enemy technology. Each tank 
and missile launcher telescopes into 
view and does a 360-degree spin while 
the screen displays all available data 
beneath. 

But the main treasure of Starglider 
easily outshines all that window dress- 
ing, as good as it is. What matters here 
is all-out futuristic battle action, and 
Starglider delivers it, guns blazing, en- 
gines roaring, and bombs bursting. For 
pure visceral excitement, tiiis is one of 
the year's best. 



exciting science fiction action game, 
with more than a dash of strategy to 
spice the tactical combat. 

The game casts the computerist as 
the pilot of an IBIS spacecraft. The 
player and four other spacemen jour- 
ney to an alien planet on what looks 
like an uneventfiil recon mission. 

The destination world is divided into 
five zones. Alpha through Epsilon. The 
massive artificial intelligence which 
donunates this worid (the C.I.U.) is 
planning to invade Earth. After acquir- 
ing this information, the player must 
make contact with the other spacefer- 
ers, destroy the C.I.U. before it springs 
its attack, and escape to safety tluough 
the Intergalactic Teleport in the Epsi- 
lon exit zone. 

What makes Parallax so interesting, 
however, is that it permits the player 
to explore the alien world either in the 
IBIS or on foot. When the player 
moves to specific points in each zone, 
a menu appears which provides die op- 
tion to leave the craft with whatever 
supplies (oxygen, guns, ammo, drugs, 
and scientists) are required. 

On foot, the player can enter the 
Hangars, which house the scientists 
and computers under the protection of 
deadly robot guards. The player must 



Your mission in 
Parallax: to de- 
stroy a massive ar- 
tificial intelligence 
which dominates 
an alien world, 
then escape to 
safety. You and 
four comrades can 
explore the planet 
either on foot or 
from your IBIS 
spacecraft. 
READER 
SERVICE NO. 121 



At first look, Ptrallax (Mindscape) 
seems like yet another unremarkable 
'Xevious clone: an arcade-style shoot- 
em-up in which the player blasts any- 
thing tiiat moves while piloting a fly- 
ing cannon. Second and third glimps- 
es, however, reveal that there is more 
happening here than first appeared to 
be the case. Parallax is an original and 
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obtain data cards from scientists and 
feed them into data terminals in order 
to decode the passwords for each of the 
alien zones. When the computerist de- 
ciphers tiie final password in the final 
zone, the C.I.U. unit self-destructs. 

This phase of Parallax is balanced 
by some dandy combat scenes. The 
IBIS can actiially change altitiide and 



i 



engage targets on several levels. 

The Parallax screen displays the ac- 
tion from a straight overhead pjerspec- 
tive. The IBIS can whiz through the 
sky, land on a strip, or move through 
the underground out of the player's 
view. 

The topography also includes "black 
holes," When the IBIS flies over one 
of these, it sucks the ship into its inky 
maw and spits it out of an adjacent 
"hole" with a boost in velocity, A dex- 
terous pilot can fly into a series of these 
black holes to build up speed. Hyper- 
space Ports are similar to black holes, 
except that they "port" the BIS to a to- 
tally random point. 

Puzzles and challenges are sprinkled 
throughout this game like Easter eggs. 
For example, the scientists won't give 
up their data cards unless they've been 
drugged first. The only way to get past 
this sticky bottleneck is to carry a sup- 
ply of narcotics with which to immobil- 
ize the savants. 

In light of some past criticism, it is 
important to mention that the docu- 
mentation supplied with Rimllax is ex- 
cellent. It tells computerists everything 
they need to get the most out of the 
Parallax experience. 

Parallax also has one of the strang- 
est sounding theme songs in computer 
history. It's not exactly pleasant listen- 
ing, but it's guaranteed to be the first 
one you've ever heard quite like it. 

The visuals, though nothing extra- 
ordinary, are at least workmanlike and 
totally acceptable. Greater realism in 
the animation of the IBIS ships would 
have improved the game. When an 
IBIS bounces off a zone division line, 
for example, it looks too cartoonish. 
Fortunately, the heart and soul of the 
gameplay, the IBIS' cannon, works very 
smoothly. 

So don't pass by Parallax without a 
thorough inspection. It may look a litde 
too familiar at first boot, but there's a 
treasure of a science fiction action 
game inside. 



Uridium (Mindscape) is a high class 
throwback to a simpler age of compu- 
ter entertainment. Designer/program- 
mer Andrew Braybrook cloaks this 
deep space slugfest in a rudimentary 
story, but what Uridium is really about 
is flying, shooting, and dodging. 



A fleet of super-dreadnaughts is 
menacing the game's home solar system. 
The huge interstellar craft are drain- 
ing the mineral resources of the region's 
15 planets for fuel. Under the player's 
joystick control is the last Manta fight- 
er capable of repulsing the invaders. 

The computerist begins this do-or- 
die mission with three lives. If the 
speedy and maneuverable Manta foils 
to eliminate a super-dreadnaught be- 
fore exhausting its three lives, the game 
ends in an alien triumph. Otherwise, 
the Manta continues the battle against 
the next alien vessel. 

Program* Covered 
In this Article 

STARGLIDER ($39.95) 
Firebird Software. P.O. Box 49. Ram- 
sey, NJ 07446 (phone: 201-444-5700). 

URIDIUM ($29,95) 
PARALLAX ($29.95) 
Mindscape, 3444 Dundee Road, 
Northbrook, IL 60062 (phone: 312- 
480-7667). ,,;.i_ifc.J^i 



Before the Manta can directly attack 
a super-dreadnaught, it must duel the 
swarms of protecting fighters. These 
come in various shapes and sizes, and 
they zip back and forth across the 
screen at good speed. 

When the Manta has thinned the 
protective screen of fighters sufficient- 
ly, the "land now" message appears in 
the upper right comer of the screen. 
If the Manta flies flat from left to right 
over die runw^ located at the right end 
of each super-dreadnaught, the Manta 
ship enters the fuel pod chamber. 

In this subsidiary phase of the pro- 
gram, the display shows a pyramid of 
blinking lights. The player must press 
the joystick button at the instant the in- 
dicator with the bonus number is lit. 
The gamer repeats the procedure at 
each level of the pyramid, but must se- 
lect "Quit" before the countdown clock 
at the top of the screen reaches zero. 

The main display then returns, so 
that the Manta pilot can watch the 
once-powerful alien colossus vaporize. 
Uridium permits the Manta to make a 
final strafing run against the defeated 
foe before transporting it to the next 
planet and a new adversary. 

The reference card which comes 
with the eight-page instruction manual 
quickly teaches the computerist to con- 
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trol the Manta ship with the joystick. 
Pushing the jc^stick forward or back 
sets the Manta's position relative to the 
super-dreadnaught which it is current- 
ly attacking. Pushing it left or right 
governs the speed and direction. 

A couple of interesting special man- 
euvers are possible. Pushing the stick 
all the way in one direction produces 
a half-loop followed by a half-roll. This 
acrobatic move is especially useful for 
avoiding incoming missiles and mines. 
The Manta executes a 90-degree roll, 
handy for getting through tight scrapes, 
when the player moves the stick for- 
ward or back while pressing the action 
button. 

The button also fires the Manta's 
twin cannon. Battle-hardened blast bri- 
gaders will regret the feet that each sal- 
vo requires a separate press of the but- 
ton. Uridium is the kind of action con- 
test which screams for continuous fire. 

The graphics are good, though a lit- 
tle flat. The singular exception is the 
Manta itself, which looks great as it 
darts and swoops around its much larg- 
er antagonist. 

Veteran computer gamers will not 
have to be told that Uridium is essen- 
tially the product of a single creative 
individual. Braybrook does a solid job 
on the play-mechanics, control scheme, 
and main action, but he includes few 
of the niceties which most software 
buyers take for granted. Bringing in a 
specialist to handle the option screens, 
vanity board, and other admittedly 
peripheral aspects of the program 
would have produced a more profes- 
sional, "finished" program. 

Real joystick jockeys won't let any 
lack of trimmings deter them from 
wading into this spacebome shoot-out. 
The power of Uridium is its thrills, not 
its frills. Carnage connoisseurs, this 
one's for you. 

Things to Come 

Thanks to the timely infusion of Brit- 
ish-designed programs, science fiction 
action contests are riding a new wave 
of popularity in the United States. Pub- 
lishers are issuing two to three new fu- 
turistic disks per month. 

In other words, the fijture couldn't 
look brighter for science fiction action 
contests. Armchair space pilots are ad- 
vised to keep the rockets warm, and 
their trigger fingers at the ready, D 
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By MicKael R. Davila 

'^SenTj^ur programming and hardware hints to Tips Ahoy!, 45 West 34th Street -Suite 500, New York, NY 10001. 



DIRECT LOADS 

1 never seem to be able to remember filenames. If you're 
like me, you frequently use the directory to load programs, 
by typing LOAD in front of the filename and then adding 
,8: or ,8,1 at the end of the filename. Wouldn't it be nice 
if I could just type LOAD in front of the filename, press 
RETURN and have ,8: or ,8,1 already there? 

I knew it was possible to embed characters to the right 
of the filename by separating the filename from the em- 
bedded characters with a SHIFTed space (when embedded, 
COMMODORE-D turns out to be a comma, and the shifted 
@ a colon). I could of course rename each file one by one 
and remember the proper sequence to add ,8: or ,8,1, but 
that seemed like too much trouble. 

I modified a program that appeared originally in Tips 
Ahoy! (Ahoy!. February 1986, page 87). Directory High- 
lighter was designed to highlight a filename in the direc- 
tory. A few modifications allowed me to use this program 
to add the ,8: or ,8,1 suffix. The addition of this suffix still 
allows 12 characters for my BASIC program filenames and 
11 characters for my machine language program filenames. 

— Benoit Beaudoin 
Montreal, Canada 

•10 OPEN15,8,15:G0SUB160 

•20 SS$=CHR$(160):CD$=CHR$(172):N8$=CHR$( 

56):SA$=CHR$(186):N1$=CHR$(49) 
•30 BA$=SS$+CD$+N8$+SA$ 
•40 ML$=SS$+CD$+N8$+CD$+N1$ 
•50 PRINT"[CLEAR][RVSON]B[RVSOFF]ASIC OR 

[RVSON]M[RVSOFF]ACHINE LANGUAGE 
•60 GET KY$: IF KY$="" THEN 60 
•70 IF KY$="B" THEN K/j 
•80 IF KY$="M" THEN 130 
•90 END 
•100 INPUr'NAME OR BASIC PROGRAM" ;BP$ 

• 1 10 PRINT#15 , "RO : "+BP$+BA$+"="+BP$ : GOSUB 
160 

•120 G0T050 

•130 INPUT"NAME OF ML PROGRAM";MP$ 

• 140 PRINT#15 , "RO : "+MP$+ML$+"="+MP$ : GOSUB 
160 

•150 GOT050 

•160 INPUT#15,E,E$,T,S 

•170 IF E=0 THEN RETURN 

•180 PRINT E,E$ 

•190 END 

SINE DRAWING ON THE C-128 

The SIN mathematic function is a very old yet powerful 
tool in BASIC. With the power and speed of the 128*s BASIC 
7.0, the SIN can be used to create complex designs. 

The program below uses three main variables that you 
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must answer at the INPUT prompt. They are for the X and 
Y axes, and the degree at which the picture is to be calcu- 
lated and drawn. The program makes use of the 128's DRAW 
command also. The DRAW command uses a different kind 
of technique, as you will see in lines 50 and 64, DRAW- 
TO? I know, the 128's documentation does not make men- 
tion of it; however it is the equivalent of DRAW 1, RDQT 
(0), ROOT (1) TO X,Y, where RDOr(O) and (1) are the 
last X and Y coondinates drawn at. Thus DRAWTO simply 
means to DRAW a line from the last X and Y location to 
an updated position. 

When you run the program, experiment with different 
X and Y axes and the viewing angle. There are many, many 
possible screen formations! —Robert J. Tiess 

Middletown, NY 

U COLOR 0,1 : COLOR 4,1 :C0L0R 5,12 

16 GRAPHIC 0,1 : C=0 : Z=0 : B=0 : U=0 

18 INPUT "HORIZONTAL AXIS";H 

20 INPUT "VERTICAL AXIS";V 

22 INPUT "VIEWING ANGLE TO 360" ;P 

24 RA=57.2957 

26 NT=90 

28 NF=95 

30 0T=120 

32 TS=127 

34 E=8 

36 FOR 1=1 TO 90 : NEXT 

38 P=P / RA 

40 GRAPHIC 1,1 

42 IF V >= H THEN M=V 

44 IF H > V THEN M=H 

46 Z=Z+H * (E/M) 

48 B=B+V * (E/M) 

50 X=INT((SIN(Z/RA+P)*OT)-f-TS) 

52 Y=INT((SIN(B/RA)*NT)+NF):IF U=0 THEN 

LOCATE X.Y : U=l 

54 C=C+1 

56 IF C=< 4 THEN 64 

58 DRAWTO X,Y 

60 GETA$ : IF A$=" "THEN 68 

62 GOTO 46 

64 DRAWTO X,Y 

66 GOTO 46 

68 GRAPHIC 0,1 

70 GOTO 16 

COLORFUL 64 

If you think the Commodore's 16 colors aren't enough, 
you may like this. This short program will allow you to 
use 29 different background colors. It creates a custom char- 
acter in the shape of a checkerboard. When this character 
is printed, it will blend with the background to make a new 
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PRINTERS 



SOFTWARE CLOSEOUTS 



DISKETTES 



SonyDSDDSW $ 9.97 

Memorex DSOO SVi* $ 8.97 

Precision DSDO SVi" $ 7.97 

Bonus by Verbatim DSDO SV< 'S 6.97 

Sony aVi" DSDO $ 25.50 

Sony 3'-4" SSDD $ 19.50 

Winners y/i" DSDD t 24.00 

ZorK I J 4.77 

Zor* II S 4.77 

Zor* III S 4.77 

File Now $ 7,77 

Calc Now $ 7,77 

Frogger $ 7.77 

Q Bert $ 7.77 

Popeye $ 7.77 

MuWipIan J29.77 

Tnad S 4.77 

Batttezofie S 7.77 

RobOlron t 7.77 

Hack-Em Up I 6,77 

Mafih 5 t 22.50 

Mach 128 $ 29.90 

Leader Board $ 23.90 

Tournamem Disk $ 12.90 

Aerojet $ 20.77 

F15 Strike Eagle % 19.47 

CondicI in Vietnam $ 19.47 

Gunstiip S 22.77 

Silent Service S 24.77 

i 

Certificate Maker S 29.90 

Newsroom % 29.00 

Clip Art I $ 18.90 

Clip Art II S 22,00 



ACCESS 



MICROPROSE 



Okimate ID S124.77 

Okimate 20 $134.77 

Plug-N-Print C64 $ 59.77 

Plug-N-Pfinl Amiga S 69.77 

Panasonic 1091 (224.77 

Panasonic 1060 $199.77 

Star NX ID $239.77 

Star SG10C $228.77 

Okimate 120 $224.77 

Epson LX BO ..$239.90 

Epson FX as $369.90 

Epson FX 286 $479,90 

VIC 1SSS Graphics Primer $ 99.90 

MPS 803 Printer $109.90 

C1600 300 Baud Modem $ 37.90 

Commodore PltJs/4 $ 79.90 



TIMEWORKS 



Sylvia Porter's 

Personal Finance $ 39,90 

Data Manager 128 $ 37.77 

Swiftealc 128 w/Sideways $ 37.77 

Wordwriter 128 w/Spell Check, $ 37.77 
Partner 128 $ 37.77 

All Four $149.90 

Data Manager S 27.77 

Wordwriter $ 27.77 

SwiftCalc $ 27.77 

AH Three $139.77 



DIGITAL SOLUTIONS 



Pocket Writer 64 $ 23.77 

Pocket Writer 12B,.. $ 28.77 

Pocket Plariner 64 $ 23.77 

Pocket Planner 128 $ 28.77 

Pocket Filer 64 $ 23.77 

Pocket Filer 12 $ 28.77 




MONITORS 



Samsung 14" Cotor $139.90 

Samsung Green 12" $ 49,90 

80 Col, Cable $ 8.77 

Monitor Cable $ S,77 

NEC 12" Cokw $134.90 



1-800 233-6343 

OBi:>ro.s ONLY 
226 Lincoln Road Miami Beach, FL 33139 



COMMODORE HARDWARE 



0129 Computer $259.90 

C1571 Disk Drive $239,90 

MPS 1200 Printer $249.90 

C1902 Monitor, , $288.00 

C1350 Mouse $ 37.90 

C1660 300 Baud Modem $ 49.90 

C1670 1200 Baud Modem S14S.90 

C64 Computer SI 39,90 

64C Computer S CALL 





1 JOYSTICKS & ACCESSORIES 


WICO The Boss 


..$ 10.77 

.$ 14.77 

,$ 18.77 

,,$ 6.77 

.,$ 6.77 

..$ 7.77 

.$ 14.77 

..$ 6.77 

,.» 7.77 

$ 7.77 

$ 7.77 




WICO Sail 


WKO 3 Way 

Kraft 


5Vi" Drive Cleaner 

3'/}' Drive Cleaner 

CRT Cleaner 


C64 Cover 

C128 Cover 

Drive Cover ST 

Printer Head Cleaner 






CLOSEOUT 




Koala Pad 

By Koala Technologies , , , 


$ 39.77 






ABACUS 



Assembler Monitor . 

BasK 128 

Basic 64 , 

Cadpak 128 

Cadpak 64 

Chartpak 128 

Chartpak 64 

Cobol 

Forth 

Powerplan 

Quick Copy 2,0 ,, , 
Super C Compiler 

Super Pascal 

TA,S 

Video Basic 

XPER 



24.99 

39,99 

24,99 

33,99 

2799 

2799 

24,99 

27.00 

$ 26^ 

$ 26J0 

.t 14M 

.$ 39M 

.$ 3SJ0 

.S 39M 

$ 27.90 

$ 39.90 



MASTERTRONIC 



Can for Pricing 
...IN STOCK... 



Championship Wrestling $ 23.90 

Word Games $ 23,90 

Supper Cycle $ 23,77 

Summer Games $ 23.90 

Summer Games II I 23.90 

Winter Games S 23.90 

Fasi Load. $ 23.90 

Mulliplan $ 39.90 

Worid Karate Champ $ 17.90 

Worids Greatest Baseball $ 22.90 

Koronis Rift $ 22,90 

Eidolon $ 22.90 



SUBLOGiC 



Jet I 2S.70 

Flight Simulator II $31.70 

Scenery Disks 1.6 $ 13.70 EA- 

Scenery Disk 7-12 $ 13.70 EA. 

Scenery Disits 6 Pack $ 69.70 



BATTERIES INCLUDED 



Consultant $ 3S.77 

Paperclip $ 35.97 

Paperclip w/Spell $ 47.77 



Last V8 

5 A Side 

Slugger 

Paul Macartney, , 

BMX Racer 

Sky Jet 

Line Action Biker, 

Skiwriter 

Busicalc 3 

Instant Recall 

• All 3 



6.49 
6.49 
6.49 
6.49 
6.49 
6.49 
6.49 
11.99 
11.99 
11.99 
29,97 



ACCOLADE 



Ace of Aces , 
Dam Busters , , , . 

Fight Night 

Hardball 

Law of the West . 



,$ 18.90 
$ 17.90 
.$ 17,90 
.$ 17,90 
,$ 17,90 



BRODERBUND 



Karaleka $ 17.00 

Pfinishop $ 25.90 

LIB 1/2/3 $ 14.90 

Companion $ 24,90 

Bank Si. Writer $ 32.90 



PRECISION 



Superbase 64 $ 47,77 

Superscript 64 $ 47,77 

Superbase 128 $ 52,77 

Superscript 128 . , , - $ 52.77 



(.■JUDLU.S ONLY 



1-800-233-6345 



CUSTOMER SERVICE OR IN FLORIDA (305) 538-1364 

FREE FREIGHT ON ALL ORDERS WITHIN CONTINENTAL U.S. OVER $100.00 

Orders under $100,00 add S4,00 shipping and handling, C.O,D, orders add $4,00, 
Prices rellect a 3% cash discount, A.RO,, F,P,0. orders add 6% shipping & handling. Postal orders shipped surface 
Add 6% 'or atr sriipmeni. Add 3% tor VtSAyMC. Florida residenrs add 5% sales lax. Personal checks allow 2 weeks ior processing- 
Prices Subject to Ctiange V^ilhout Notice 

ORDERS RECEIVED BEFORE 12:00 PM WILL BE SHIPPED SAME DAY. 
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EMERALD COMPONENTS INTERNATIONAL 



DISK DRIVES 



FSD-2 

EXCELERATOR PLUS 

Commodore Compatible 

DISK DRIVE 



Direct Drive! 

Faster, Quieter 

and More Reliable. 

Full One-Year Warranty. 



fnaimTia 



$159 



COMMODORE 1541 DISK DRIVE 




$142 



COMMODORE 1541C DISK DRIVE 







$169 



HARDWARE & ACCESSORIES 



COMMODORE 64 
COMPUTER 






$129 



*miii'mm» 



With specially priced 
software package 



COMMODORE 
POWER SUPPLY 




MODEM li 

300 Baud 



$28 



SAVE OVER $70! 



MOUSE 



$36 




HEAD CLEANING 
KIT 



$1195 




JOYSTICK 



$9.95 




ALL MAJOR CREDIT CARDS ACCEPTED 




^S 



6 AM TO 6 PM 
6 DAYS A WEEK 



Emerald Components International 
P.O. Box 1441 / Eugene, OR 97440 
In Ore., Call: 503-683-1154 
Customer Service: 503-683-1154 

For lurlher information, contact your local Commodore dealer. 



1-800-356-5178 
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shade. If you print it in red. you will have a dark red. be- 
cause the checkerboard will let some of the background 
color come through. 

When you run the program, aJl this will seem a lot clear- 
er. The program will print out 29 different colors, includ- 
ing 8 shades of gray, 6 shades of red, and 4 shades of green. 
If you fool around with different background and text colors, 
you can create some interesting combinations. 

When you first run the program, you will have to wait 
about a minute while it transfers the character data. 

—Chris Jones 
Oak Ridge, TN 

•5 PRINT" [CLEAR] [HOME] LOADING DATA [3"."]" 

: POKE52,48:POKE56,48:CLR 
• 10 P0KE56334 , PEEK ( 56334 ) AND254 : POKEl , FEE 

K(1)AND251:F0RI=0 TO 2040 
•15 POKEC 12288+1), PEEK (53248+1): NEXT: POKE 

1 , PEEK ( 1 )0R4 : P0KE56334 , PEEK( 56334 )0R1 
•20 POKE53272,(PEEK(53272)AND240)+12 
•25 F0RG=0T07:READ A: POKE 13080+G, A:NEXT 
•30 POKE53281,0:POKE53280,0 
•35 PRINT"[CLEAR][WHITE]29 POSSIBLE COLOR 

S" 
•40 PRINT" [5" "][WHITE][RVS0N][5" "][RVSO 

FF][RED][5"[c T]"][BLUE][5"[c T]"][PURPL 

E][5"[c T]"][GREEN][5"[c T]"] [YELLOW] [5" 

[c T]"]" 
•45 PRINT"[c 4][5"[c T]"][5" "][c 3][5"[c 
T]"][c 7][5"[c T]"] [PURPLE] [RVSON] [5" " 

][RVSOFF][c 6][5"[c T]"] [YELLOW ][ RVSON] [ 

5" "][RVSOFF]" 

•50 PRINT"[c 5][5"[c T]"][5" "][c l][5"[c 
T]"][CYAN][5"[c T]"][5" "] [GREEN] [RVSON 

][5" "][RVSOFF]" 
•55 PRINT"[c 8][5"[c T]"][5" "][RED][RVSO 

N][5" "][BLUE][5" "][RVS0FF][5" "][c 6][ 

RVSON] [5" "]" 
•60 PRINT" [ WHITE ][ 5" [c T]"][5" "][c 3][RV 

S0N][5" "][c 7][5" "][RVS0FF][5" "]" 
•65 PRINT" [c 4] [RVSON] [5" "][RVSOFF] [5" " 

][c 1] [RVSON] [5" "][CYAN][5" "]" 
•70 PRINT" [c 5] [RVSON] [5" "][RVSOFF] [5" " 

][c 2][RVSON][5" "][RVS0FF1" 
•75 PRINr'[c 8] [RVSON] [5" "][RVSOFF]" 
•80 PRINT"[ HOME] [11" [DOWN]"]" 
•85 PRINT"[WHITE]8 GRAYS 7 REDS 6 BLUES 

2 PURPLES" 
•90 PRINT"4 GREENS 2 YELLOWS" 
•95 DATA 85,170,85,170,85,170,85,170 

CHASER MARQUEE 

Would you believe a 12-line program that creates a mar- 
quee of chasing lights around the border of the screen? 

You can make your own in assembly language, or you 
can tack this nifty little routine I created onto the begin- 
ning of any BASIC program to add a touch of class. 

The routine uses extended background color mode, so 
you are limited to the first 64 characters for your titling. 



The FOR-NEXT loop in line 130 is a delay loop; changing 
the value of "X" will control the speed at which the lights 
run around the perimeter. You can also POKE values other 
than red and white into the color registers in line 90 for 
different effects. Try gray and white or two blacks and a 
bright color for neat variations. There are three registers, 
and the colors you POKE into them will chase after one 
another around the edge until you push any key to contin- 
ue with the rest of the program. 

A must-have for onscreen board games or displays! 

— Cleve Blakemore 
Richmond, VA 

• 10 PRINTCHR$ ( 147 ) : V=53248 : POKEV+32 , : POK 
EV+33,0 

• 20 FORX=0TO37STEP3 : P0KE1024+X , 64+32 : POKE 
1024+X+l , 128+32 : POKE1024+X+2 , 192+32 

• 30 P0KE1984+X , 192+32 : P0KE1984+X+1 , 128+32 
:P0KE1984+X+2, 64+32 

•40 NEXT 

•50 FORX=OT022STEP3 

•60 P0KE1024+X*40,192+32:P0KE1024+(X+1)*4 

0, 128+32: P0KE1024+(X+2)*40, 64+32 
•70 POKE1063+X*40,64+32:POKE1063+(X+1)*40 

, 128+32: POKE1063+(X+2)*40, 192+32 
•80 NEXT: POKE2023, 128+32 
•90 POKEV+17,PEEK(V+17)OR64;POKEV+34,1:PO 

KEV+35,2:P0KEV+36,2 
•100 P0KE214,7:PRINT:PRINTTAB(12)CHR$(31) 

"YOUR TITLE HERE" 

•110 A=PEEK(V+34):B=PEEK(V+35):C=PEEK(V+3 
6) 

• 1 20 POKEV+34 , C : POKEV+35 , A : POKEV+36 , B 
•130 GETA$:IFA$=""THENF0RX=1T075: NEXT: GOT 

OHO 

NUMBER ROUNDING 

While writing antenna designer programs I became frus- 
trated with trying to insert numbers into lines of text. Al- 
most invariably the numbers would have 5 or more decimal 
places, making it impossible to maintain neat lines. Since 
such accuracy is neither necessary nor possible to main- 
tain when cutting the antenna, I began to look for a way 
to round those numbers to one or two decimal places. The 
integer function provides an easy way to round a number 
down to the next lowest whole number. The expression h— 
INT(A+.5) will round to the nearest whole number. Round- 
ing to one decimal place then becomes A=INT(A*10+.5)/10. 
This formula can be extended to round to as many decimal 
places as desired. The short program below will calculate 
the correct length of a half wave dipole antenna and round 
that length to one, two, and diree decimal places. 

— Henry F. Smith 
APO Miami, FL 

•10 REM NUMBER ROUNDER 

•20 PRINT" [CLEAR] [DOWN] [DOWN] [8" "] [RVSON 

]HALF WAVE DIPOLE DESIGNER [RVSOFF]" 
•30 INPUT" [DOWN] FREQUENCY IN MHZ ";FR 
•40 A=468/FR 

AHOY! 49 



y> 



^^ 



<^ 



BULL'S-EYE 



so GOOD, 
EVEN WE CAN'T BELIEVE IT. 



ThtnK of the best disk? in your library: the vdry besr 
ones, (he cream of the crop. Chances are. those ar^ 
the same disks that you haven't been able lo bacK 
up. Until now. 

■mx'i'HTS was created for only one reason: to 
back up itie impossible To archive the programs 
that are protected with the rtewest, toughest 
routines on the market. 

We'd like lo go Into more detail, but we can't— these 
mies are so hoi, we can't mention their names in 
this ad. But you know the ones we mean. Just think 
ot (he biggest narres in software. Think of the most 
complex and effective protection schemes you've 
ever run up against. Now think of the very best 
archival safiware on me market today. . . 

■VUi'l-SYX— from Xnelitr Jui. 



ONLY $19.95 



KRACKER JAX® 

A REVOLUTION IN 
ARCHIVAL SOFTWARE! 

Krack*r Ju is the powerful parameter copy system 
ttiat Is tatting ttie country by storrri! Wtiat IS a 
parameter! It's a custom prooram Itial allows your 
1541 or 1571 disK drive to strip all copy prelection 
from your expensive sottware, leaving you with 
UNPROTECTED, TOTALLY BROKEN backups that 
can everi be copied with a simple fast copier. 

• Xr»k>r Ju is the BEST program of its kindl 

• Xfioktr Jut will back up titles that the nibbiers 
CANT! 

• Xraemr jai requires NO special knowledge lo 
operate! 

• Krtckar Ju strips protection In a matter ot 
SECONDS! 

• XnGkar Ju is priced RIGHT— Just $19.95 per 
Volume. 

• Kraeku Ju is UN PROTECTED —easy to back up! 

• Krackar imx. updates are available QUARTERLY! 

VOLUME FIVE INCLUDES A POWERFUL 
NEW C64/C128 FAST COPIER! 

ALL NEW VOLUME FIVE 

VOL. 1-4 STILL AVAILABLE. 
ONLY S19.95 EACHI 



^\ri=^ HACKER'S 
^^ UTILIXY KIT 



Are you ready to lake control of your soflware? Let 
us tielp! Our Backar'a VtlUtr Xlt contains the most 
impfessiva array of tools ever assembled in a single 
package! You get: 

• WHOLE DISK USAGE/EnRORfOENSITY 
SCANNER— get needed info tasV. 

' GCR EDITOR- view raw data the way your 
computer reads it! 

• FAST DATA COPIER— won'r write errors! 

• 1 OR 2 DRIVE NIBBLER— Stale of ttie an! 

• FILE TRACK AND SECTOR TRACER-tind any 
sector link in a file /asr.' 

• BYTE PATTERN FINDER -scan the disk for any 
patiern you choose! 

• CUSTOM COPIER CREATOR-the only one of Its 
kmd! 

• RELOCATABLE MfL MONITORS— including drive 
montlor! 

• FAST FORMATTER— programmable tracks or 
whole disk! 

• DISK FILE LOO— quickly find Hie start and end 
addresses! 

So how good is this package? Just remember thai 
it's put out by Xraakar Jax, the people who live at 
Ihe cutting edge ol archival technology. Tflaf's Itow 
□ood it Is! _ 

ONLY $19.95 



KRACKER JAX® REVEALED! THE BOOK 

At last— Krickar Jaz takes you beyond the protection barrier. The secrets of uri- 

protecting software are yours wilh Xraekar Juc revealed? 

We'll show you exactly t\ow to defeal frve different protection schemes 

encompassing scores of current programs. Our tutorial has twenty specific 

examples lo lead you siep by step, to a new level of knowledge. Here's what you 

get: 

* Krackar Jax revealed. ■ A reset switch. • A utility disk. * 20 parameters on disk. 



ONLY $23,50 COMPLETE! 

Please altow two weeks for detlvery. 



IHE SHOTGUN 



Those of you who have used our Krackar /ax parameters hnow just how good 
they are. Can you imagine the kind of nibbSef we could put out? Well, you don'l 
have to imagine il because it's HERE! THX BHOTOinv, our r>ew premium nibbler 
utUity, ^s available two ways: 

• TKS tHOTOini by itself —offered to you al the unheard of introductory price of 
only (14.95! 

• THX LOASID SHOTOm— Packaged WITH 32 of the most popular Eraokar 
Jut parameters ever created— only $19.96! 

Wfiichever vefsionyou order, you'll find THA SMOTQin to be loyal to thaKrackar 
Jax tradition of more quality fof less money. 



THE G-128 GANNON 



Here's ttie package you C-128 owners have been 
waiting lor! The C-IU CAnOM gives you more power 
than you ever hoped for! Just look al some of these 
capabilities: 

• NIBBLER— Works with single or dual 157111541 
drives! 

• FAST COPIER— Great lor data disks Or use with 
Xraekar ^axl 

• FILE COPIER— Makes file maintenance and ma- 
nipulatior^ easy! 

• isai FAST COPIER— For use with Ihe new high 
speed 3.5' drive! 

• 15S1 FILE COPIER— For high speed (lie manipu- 
lation! 

• MFM COPIER— Copies unprotected IBM and CP'M 
disks! 

•T/S EDITOR— Works with 1541, 1571, and the new 

1581 drives! 
■ ERROR SCANNER — Complete with onscreen 

display! 

• DENSITY SCANNER-Check for altered densities 
track tjy track! 

• DIRECTORY EDITOR— Alter & organize your disk 
directories! 

• ESACXBB JAZ— You also get 100 of our most 
popular paramelers! 

You've seen nibbiers alone that sold for thirty-five or 
forty dollars. And the tOO Eraoker Jax parameters are 
a Iwenly dollar value Yet the ENTIRE c-lU CAnO> 
utility package sells for |ust S34.9S. Never before has 
this much power and control tjeen integrated into a 
single, affordable product. If you own a C-12B. you 
deserve the c-118 CAnoBI 



C-128 owners, this is the package 
ol your dreams— only $34.95 
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IKE GRAPHIC LABEL WIZAXO 



No, we don'l have the Wrar graphic label utility on the market- but we have the best one! Wlttioul doubt, the 

Wizard is Ihe holiest graphic label program around! Check out some of these leatures: 

* Use Print Stiop, Print Master, or your own custom graphics! * Print a graphic & up to 6 lines of text on a 
standard label! • Uses pop-up menus/Includes extra graptiics'saves labels onto disk! • Works with bolh Epson 
& Commodore compatible dotmalrix printers! * Will print different text styles 4 sizes on approprial© prmters! 

* Hi-res preview of up to 4 different graphics on screen al onetime! • Mac time language programming for ultra- 
fast speed and fieiibiilly! • Special CATALOG feature lets you print titled display sheets of your Print Shop, 
prlntmaster, and custom graphics— wilh up to 28 high-res graphics per page! 

And these are just some of the things that the (Irapblu LalMl wlurd can do! So the next time your cuslont 
labels need a special touch, fust summon up a little magic— from lite Wizard. 

ONLY $24.95 



THE MSD DUAL CANNON 

MSD owners aren't lell out in Ihe cold anymore! Th« all new lUD DVAI. OUMOV givss you state of the an 

control over your advanced eQuipment! You get: 

• A NIOBLER- for backing up your protected programs! • A FILE COPIER — for easy file maintenance and 

manipulation! • A SECTOR EDITOR- developed jusi for the MSD dual drive! • FAST COPIER— thai WON'T 

Iransler errors- perlect lor use with data disk or xraekir *ai parameters! • AUTO MODE- drive can copy 

without computer connected! • SPECIAL BONUS— you get 32 free Kraclnr Ju parameters! 

Start gelling the lull performance that your MSD drives are capable of delivering. You already *now you own 

the finest drives available— so why settle for anything less than the best utilities made for them? 

Get the most out of your special equipment— only $34.95! 



SUPER GAT 



II you had the time and skill to create your own custom disk catalog system, the paramount system ol your 
wildest dreams, it probably STILL wouldn't have all the leatures of tvtu cm For example: • Catalog up to 
640 disk dlrectorles—12S0 wllh2dfivas! • Index &alphatietlze over 5000 titles— lOOOOwith 2 dhves! •Unique 
ID'S are NOT necessarylfA printer is NOT required! • Find ANY title tn 10 seconds— sort 1000 titles in 8 
seconds! • Automatic entry with Selection, Edit, and Cross Ref. options! 

(UTIB CAT has literally too many features to fit in here. From the easy, menu driven wor1< screens lo Ihe 
comprehensive output options, lUTia CAI is the most powerlul and complete disk catalog system available 
today! 

The ultimate software library index system— only $24.99 



BASIC PROGRAMMERS— CONTACT US ABOUT "ON-LINE HELP!" 



QDMPITEF MART 



Need more into' Call or 
write for out free catalog 



Program submissions wanted! 
Good Commissions— 
Nalional Marketing. 



CHECKS. MONEY ORDERS OR VISA/MASTEHCARD 

Mail youf order lo Computer Marl. DepI i 
2700 NE Andresen Hoad/Vancouver. WA 99661 
Phone orders welcome 206-695-1393 
Same day shipping/No COO. orders oulsiCe U S, 



PLEASE NOTE: Free shipping & handling on all orders • C.O.O. add S3.00 lo total order * All orders musi b< paid In U.S. funds. 



DEALERS— WE HAVE THE SUPPORT YOU'RE LOOKING FORI 



Reader Service No. t44 



ATTENTION C-128 OWNERS! 



FEEL NEGLECTED? 

NO 80-COLUMN GRAPHICS 

SOFTWARE? 

The Commodore C-128 is the most powerful and flexible 8-bit 
mscrocomputer yel released to the public. Unfortunately, there is 
little software available for its native 80-Calumn mode; and most of 
thai IS Productivity software using only theTexl Character Display, 
not the true 80-Column Hi-Res Graphic Display which the 
machine is capabfe of producing. 

Commodore originally intended the C-128's 8563 Video Display 
Chip to support aO-Columns onty in Text mode, not Graphics. 
While standard C-128 Basic takes full advantage of the 40-Column 
graphics capability of the machine, (here is almost nothing which 
allows the Basic programmer access to the 80-Column Graphics 
mode (Yes. there is an 80-Column Graphics mode!). 

TIRED OF WAITING FOR YOUR 128 TO 
COME ALIVE? WAIT NO MORE. 
BASIC 6 IS HERE! 

Patech Software is proud to introduce Basic 8 with Basic Paint. 
the first C-12e software package specifically designed to unleash 
the hidden graphics potential of your Commodore C-128. Using a 
special wedge technique, Basic 8 achieves performance rivaling 
that of 16-bit micros! Imagine your 128 producing resolution of 
640 X 200 in monochrome and 640 x 192 in 16 colors without 
additional hardware! Basic 8 provides the Basic programmer with 
the most powerful and productive graphics system ever devel- 
oped (or an 8-bit microcomputer! 

A NEW HI-RES 3-D GRAPHICS 
LANGUAGE FOR THE C-128 

Basic B adds over 50 Hi - Res graphics commands to Basic 7.0 and 
Is completely compatible with its advanced non-graphic com- 
mands. You work in a true 3-Dimensional environment, control- 
ling such parametefs as perspective, viewing angles and the 
origin & depth of the view. Just select one of many graphics 
modes and draw 3-D lines, dots, circles, boxes, variable arcs and 
a multitude of complex solid shapes with a single command. 
Switch easily between anyofthe32 pre-defined graphic screens, 
scroll a screen, save and load multiple screens as brushes, define 
a logo, paint with exotic color patterns of your own design and 
print hard copy of your screens in various sizes and in color' 
We've even added commands for graphic cut & paste functions, 
brushes, windows and fonts along with ultra-sophisticated con- 
cepts like multidraw, grow, sheanng. scaling and much, much, more, 
f^ore than a mere extension of Basic 7.0 - Basic 8 is a total 
Development System which provides a whole new and exciting 
programming environment. Chances are that if your graphic 
imagination can see it, Basic 8 will let you do itl. 



UNHEARD-OF RESOLUTION AND 
STUNNING COLOR DISPLAYS ON YOUR 
C-1281 

Pixel Resolution (screen size) and Color Resolution (color cell 
size) aredetermined by available Video RAIvl, The C-128 has 16K. 
This can be upgraded to the 64K of the C-128D. 
The unexpanded C-128 produces a lull 640 x 200 screen in 
monochrome and a maximum of 640 x 192 in color with an 8 x 16 
dot cell. Increasing color resolution (smaller cell) decreases 
screen height. (Dot size remains the same throughout.) The most 
useful screen is 640 x 176 with an 8 x 8 cell That's sttll pretty 
impressive' (The C-64 has 320 x 200 with the same cell.) It you use 
a 640 X 152, you can double the color resolution to 8 x 4. The 
resulting displays are absolutely stunning! 
The 64K Video RAM allows the full 640 x 200 screen with an 8 x 2 
cell (we doubled it again, this time with a full screen!) Several such 
screens can reside in Video RAM simultaneously, each with dif- 
ferent resolutions. You can view one screen while working on 
another and create Virtual Screens {larger than the displayable 
640 X 200) in Video RAM. 

BASIC PAINT - AN 80-COLUMN COLOR 
DRAWING PROGRAM! 

To demonstrate the power and versatility of this new graphics 
language, we have created Basic Paint, a flexible icon-based, 
mouse driven, 80-Column color drawing application with menus, 
fonts, brushes, patterns and requestors, Basic Paint is written in 
Basic 8, so that screens you create with it may be saved for use in 
your programs 

BASIC 8 GROWS WITH YOUR SYSTEM 

Basic 8 supports all C-128 hardware upgrades and expanders. 
Each time you up-grade your system. Basic 8 is ready and waiting 
with even more graphic power than ever' 

Special printing features include color printing, 90° rotatatile 
screens and variable dot density selection. The 64 K Video RAM adds 
printing of entire Virtual Screens with the full page being dot address- 
able. Results are limited only by the capabilities of your printer 

• • ALL THIS GRAPHICS POTENTIAL •• 

IS YOURS AT THE INTRODUCTORY 

PRICE OF $39.95 

Includes: A leO-page Users Manual, the unprotected Basic 8 

Program Disk which creates Basic 8 Work Disks (with complete 

Editor System), Basic Paint Wortt Disks and Basic 8 RunTime 

Disks (lets you load and run your creations independent of Basic 8 

using the included WORKBENCH utility). 

Requires: C-128 or 1280. 80-Column RGB Monitor & at least one 

Commodore compatible Disk Drive. 

Supports: Expanded Video RAM (to 64K), Both RAM Expanders, 

The 1351 Proportional Mouse, Joysticks and most Dot Matrix Printers 



BECOME A PUBLISHED SOFTWARE DEVELOPER! ENTER THE BASIC 8 
PROGRAMMING CONTEST WIN THE GRAND PRIZE OF SI.OOO.OQ AND 
PATECH SOFTWARE WILL PUBLISH YOUR PROGRAM! Three Other Cash 
Prizes To Be Awarded. Details Included In The Basic 8 Package. 



Mail your order to 

Computer Mart. Depi S • 27(X) NE Andresen Road • Vancouver. WA 98661 

Phone orders welcome 206-695-1393 

Same day shipping /No C orders oulside U S 

CHECKS, MONEY ORDERS OR VISA/MASTERCARD. 

PLEASE NOTE: Free shipping & handling on all orders • C.O.D. add S3.00 

to total order • All orders must be paid in US, lunds. 




Rcadtr Service No. t45 
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•50 REM ROUND TO TENTHS 

•60 B=INT(A*10+.5)/10 

•70 REM ROUND TO HUNDREDTHS 

•80 C=INT(A*100+.5)/100 

•90 REM ROUND TO THOUSANDTHS 

• 100 D=INT( A*1000+ . 5)/1000 

•110 PRINT" DIPOLE LENGTH IS [7" "]"A" FEE 

rnll 

•120 PRINT" ROUNDED TO TENTHS [6" "]"B"[3" 

"]FEET" 
•130 PRINT" ROUNDED TO HENDREDTHS "C" F 

EET" 
•140 PRINT" ROUNDED TO THOUSANDTHS "D" FE 

ET" 

RESET TO 64 MODE 

The reset switch on the C-128 is a very nice feature, es- 
pecially in the C-64 mode where you must perform a reset 
to gain control of the machine after using many commer- 
cially available software titles. Unfortunately, however, in 
order to go back to the C-64 mode, you must also hold 
down the COMMODORE key while pressing the reset 
switch. Since my femily only uses the C-64 side of the com- 
puter, they felt it was an inconvenience to press both the 
COMMODORE key and the reset switch. So I wrote the 
program below, saved it on disk as "RESET TO 64 MODE", 
and told them to enter (from the C-128 mode): RUN'RE- 



SET TO 64 MODE". 

When the program is run, it will GOTO the 64 mode. 
But more important, only the reset switch need be pressed 
to return to the 64 mode. -Shawn K. Smith 

Bronx, NY 

•0 REM RESET TO C64 BY SHAWN K. SMITH 
•1 BANK l:POKE65528, 77 :P0KE6 5 529, 255:0064 

FREE 'N EASY 

Its definitely handy to be able to check the bytes free 
on your 64, especially when using memory-eating monsters 
like arrays. As you know, PRINTFRE(O) is built into the 
machine for keeping track of memory usage. Unfortunate- 
ly it has two drawbacks. First of all, if you have more than 
32767 bytes free, the 64 merrily displays a negative num- 
ber. When this happens, youll have to type PltlNTFRECO)- 
65536*(FRE(0)<0) in order to get an accurate reading. 
Secondly, if you check the bytes free with relentless regu- 
larity, your poor fingers will be worn to a frazzle in no time. 
There is a better way. Free h Easy quickly and accurately 
displays the bytes free, no matter what their number. 

After saving a copy of Free 'n Easy, run it. This POKEs 
the data into memory. To switch it on, type SYS700, then 
press RETURN. You switch it off the same way. The first 
SYS turns it on, the second turns it off, etc. Now you can 
load, save, and work on whatever you want. 

Continued on page 98 



THEY'VE DONE IT A GAIN ! 




The programmers who created Snapshot 64, the hottest "memory cap- 
ture" utility on the market, have done it again! Introducing SUPER 
SNAPSHOT, the ultimate cartridge for ttie C64/C128. 

SUPER SNAPSHOT combines several different functions into one revo- 
lutionary new cartridge. First and loremost, SUPER SNAPSHOT is a state- 
of-the-art memory capture device. This means that you can load a program 
into your computer's RAM and, at the touch of a button, capture an exact 
image of your computer's memory. That image can then be saved to disk, 
allowing you to make vi/orking, UNPROTECTED backups of your software! 



And that's just the beginning— here're some of the highlights of this incredible cartridge: 



• SUPER SNAPSHOT works on ttie C64 or the C128 in the 64 model 

• Will copy 99.9% of ail memorv resident software on ttie market today! 

• SUPER SNAPSHOT files will run wittiDut ttiB cartridge being pljgged 
in! 

• No experience required thanks Id our window driven user menus! 

• Allows you to combine several ditferent programs onto a single disk! 

• 24K on board— easily expandable to 4aK with plug in EPHOM's! 

• Our TurtioDOS is the most compatible fast loader we've ever tested! 



• The special built in DOS wedge commands will support devices 8, 
9. 10 and 11. 

• Our ROM-based machine language monitor will NOT corrupt memory! 

• Unique RESUME feature lets you flip in and out of running programs! 

• Hi-res screen dump works with 1525. 1526. S compatibles like Epson 
& Gemini! 

• SUPER SNAPSHOT also works with all aftermarkel disk drives tested to 
date, such as the MSD, FSD. Enhancer, and more. 



Special Bonus: 40 FREE customed designed Kracker Jax parameters complete with fast copier. 
Why buy a separate cartridge for each major function? A fast loader cartridge. A machine language monitor. A screen 
dump. DOS wedge commands. A memory capture utility. Wfiat would it cost for lour or five cartridges, not to mention an ex- 
pansion board to hold them all? Thanks to SUPER SNAPSHOT, you'll never have to find out! SPECIAL OFFER FOR SNAP- 
SHOT 64 OWNERS: Send us your working Snapshot 64 cartridge (witti the original owner's manual AND the function key 
overlay card) in good working condition with your order for a S10.00 discount off the price of the new SUPER SNAPSHOT! 
This Offer applies onty to direct orders ^^p^^ SNAPSHOT 64/ONLY $49.95 



QOMPITEF 



MART 



Need moie info'' Can or 
write lor our Iree catalog 



DEALERS— Don t miss out 
on ttiis or^e— CALL' 



CHECKS. MONEY OROERS OR VISA/MASTERCARD. 

Mail your order to Computer Man 
2700 NE AnOresen fioad/Vancouver. WA 98661 
Phone orders welcome 206-695-1393 
Same day stripping 



^- 1 



PLEASE NOTE: Frw ahlpplna li tundling on all ordwi. • COD onJsra muil add J3.00 1o lotjl oidw. WA r»»klBnte must add 7.3% sales tax. 

Sony no COO onla™ accwtMl from outskJe Iha U.S. • AM on)*™ most )m paid In U.S. funds. • OnrMsa onfara plaasc add $5.00 par gnit 

Canadians may ordsr from: Marsti>l«w Sollwan, P.O. Boi 1213. Sackvllla, N.B. EOA 3C0 



52 AHOY! 



Reader Service No. 143 



y^ MIGA SISCTIO ^ 



CHAMPIONSHIP BASEBALL 
GFL CHAMPIONSHIP FOOTBALL 

Gamestar 

Amiga 

Disk; Baseball $39.95, Football $44.95 

Although other publishers produce 
action-strategy sports games, Gamestar 
has set the standard against which all 
other similar programs must be mea- 
sured. The company has now issued 
two of its best team sports titles for the 
Amiga. 

Although many notable designers 
and programmers have worked on 
Gamestar's tides, including the pair dis- 
cussed here, much credit goes to the 
company's president and chief design- 
er, Scott Orr. His vision of what an ac- 
tion-strategy sports simulation should 
be transcends the details of any indi- 
vidual Gamestar disk program. 

As a group. Championship Baseball 
and GFL Championship Football are 
easy to learn, yet require practice to 
master. Both rely primarily on joystick 
or mouse order entry and emplcy mul- 
tiple screens to catch all die action and 
the strategy which underlies it. They 
both have superb animated graphics, 
thorough documentation, and tremen- 
dous replayability. 

These "family traits" guarantee that 
Gamestar creations wUl be good, solid 
entertainment. But it is their wealth of 
detail, special features, and ability to 
capture the essence of the sports which 
they simulate that make them great 
computer games. 

Championship Baseball brings new 
sophistication to arcade-style hardball. 
Although the user can play an exhibi- 
tion with a prefabricated team or take 
batting practice, options allow the arm- 
chair manager to field customized 
squads in a league play framework. 

Drafting a team is surprisingly pain- 
less. Menus give alternatives for each 
regular and pitcher, plus a small selec- 
tion of utility men. The hitting style 
Oiner or slugger) is shown next to each 
fielder, along with his ratings for bat- 
ting, catching, running, and throwing. 
Pitchers have three ratings: speed, con- 
trol, and stamina. As a special kick, 
the computerist can name each team 



member. There's nothing like steam- 
roUing one of Championship Baseball's 
four divisions with a team of old girl- 
friends or Irangate conspirators. 

All this is only preamble to an out- 
standing action contest, A split-screen 
display shows an overhead view of the 
field on the left, and a close-up of the 
batter-pitcher confrontation from the 
catcher's viewpoint on the right. If the 
batter hits die ball, the field disp% fills 
the entire screen to fecilitate catching 
the ball, throwing it to the right base, 
and controlling the runners. 

Holding the button and pushing die 
stick in one of eight directions orders 
one of eight pitching deliveries. The 
defensive manager in diis one- or two- 
player game can toss fastballs, curves, 
sliders, screwballs, and knucklers. The 
offensive manager times the pitch and. 



Champion- 
ship Base- 
ball's split 
screen offers 
overhead and 
catcher's-eye 
views, chang- 
ing to a full 
field perspec- 
tive when the 
batter hits 
the ball. 
READER SER- 
VICE NO. m 



Foof vrecf This Monf h; 

Championship Baseball 

GFL Championship Football 53 

Morauder 11 54 

Amiga Trackball 57 

using the joystick, swings away or 
drops a bunt. 

While the ratings definitely color the 
action, hand-eye coordination and re- 
flexes dominate play. The joystick com- 
mand control scheme lets the onscreen 
players take leads, steal, pick off run- 
ners, slide into bases, and much more. 
Championship Baseball feels real and 
moves fast, two outstanding qualifica- 



GFL Cham- 
pionship 
Football's 
secondary 
screens pro- 
vide overall 
field view, 
but first per- 
son perspec- 
tive play exe- 
cution is the 
most notable. 
READER SER- 
VICE NO. 165 
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Re-ink ANY FABRIC RIBBON 
automatically for LESS THAN 
5 CENTS with 

MAC INKER 

Over 11,000 
cartridges and 
spools 
supported! 

MAC INKER 

IMAGEWRITER I AND II S42.00 

UNIVERSAL (cartridge or spool) S68.50 

MULTICOLOR IMAGEWRITER S80.00 

MULTICOLOR ADAPTER ONLY S40.00 

Shipping (firs! unit) S3.00 

■ Lubncaled DM INK EXTENDS PRINT 
HEAD LIFE! Black, blue, brown, red, green, 
yellow, purple, orange - 2 02. bottle S3. 00: 
pint $18. 50, Gold, silver, indelible and OCR 
inks available. Heat transfer Maclnkers and 
ink available plus a complete range ol 
accessories for special applications. 

■ Top quality, GUARANTEED, double density 
ribbon cartridges and reloads available. 

■ DEDICATED MACINKERS AVAILABLE 
FOR EXTRA LARGE OR SPECIAL 
CARTRIDGES- 




MERCURY MODEM 



$149.00 

Shipping S4.00 

100% Hayes" compatible! ■ 24 month 
warranty. ■ Status lights. ■ Speaker. 
■ 300/1200 baud. ■ Call progress detection. 

Quick Link communications software: 

MS DOS and Macintosh $29.95 

with modem SI 5.00 

Cable $15.00 

■Hayes is a trademark o( Hayes Microprotlucts. 
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A BUFFER AND A DATA SWITCH! 

PROTEUS 

The "Siamese" BuHer 
F!K $199.00 

i56K S299.00 

Cable $10.00 

shipping S4. 00 

■ Proteus directs two printers (working 
simultaneously) and frees your computer lor 
other applications. 

■ Now you can merge a form letter with your 
mailing list, set up one printer with letterhead, 
the other with envelopes, press "START" and 
RELAX while 

PROTEUS DOES IT ALL- 
ALL AT ONCE! 

■ Compact. ■ 2 parallel ports. ■ Multiple 
copy capabiliiy ■ "Flexible Capacity" buffer 
for each port. 

1386 ~ Best Buy of Ihe Year" Award! - Computer 
Shopper 



SPECIAL OFFBR: For orders of S100.00 or 
more. Say you saw it in AHOY ! arid get a 
tree keychain, beeper and flashlight 
combined! A S15.00 value! 



ORDER TOLL-FREE 
1-800-547-3303 

In Oregon (503) 626-2291 [21 hour line) 
We are and always will be your 

ClSmputer 
Friends® 

14250 N.W. Science Park Drive 

Portland. OR 97229. Telex 4949559 

Dealer Inquiries Welcome. 



tions for an action baseball simulation. 
GFL Championship Football can 
also simulate a season of league action, 
but its most notable innovation is the 
first-person perspective. The second- 
ary screens provide the overall field 
perspective needed to follow the flow 
of the game, but the real excitement is 
the dynamically animated play execu- 
tion screen. 

Before a team can run a play from 
scrimmage, the coach must call an of- 
fensive or defensive play for the next 
down. A pair of menus, one each for 
offense and defense, list the possibil- 
ities. Pushing the joystick highlights 
each choice in turn, and pushing the 
button locks in the command. 

That's when GFL Championship 
Football moves into overdrive. The 
graphics put the computerist right on 
the field as the running back or receiv- 
er on offense. As a running back, for 
example, you take the handoff, scoot 
laterally behind your line of trusty 
computer-controlled blockers, and hit 
a hole or swing around end. You can 
snap the joystick handle to stiff-arm a 
w«uld-be tackier, but unless your man 
scores a touchdown, a burly defender's 
lunge is the last thing you'll see before 
the whistle signals the end of the play. 
GFL Championship Football sounds 
even better than it looks, if that's pos- 
sible. Each play from scrimmage is a 
symphony of thundering footsteps, gar- 
gantuan grunts, and the teeth-rattling 
crunch of bodies colliding. 

Don't expect to breeze to the league 
title the first time. GFL Championship 
Football is probably the most demand- 
ing action sports simulation ever pro- 
duced. Yet if any computer game is 
worth a couple of hours of study, this 




SECTION 

is it. GFL Championship Football is a 
Super Bowl champion among action 
football titles. 

Acti vision, 2350 Bay shore Parkway, 
Mountain View, CA 94043 (phone: 415- 
960-0410). -Amie Katz 

MARAUDER II 

Discovery Software International 

Amiga 

Price: $39.95 

Some things never change. No soon- 
er does a new computer appear on the 
market than it is followed by third-par- 
ty copy protected software. This soft- 
ware is immediately followed by a se- 
ries of copy programs designed to du- 
plicate the aforementioned copy pro- 
tected software and to give die users 
back their government-granted right to 
create archival copies of their owned 
software. 

More often than not, in what seems 
to be an exercise in contradiction, the 
copy programs themselves are copy 
protected. This of course prompts the 
producers of subsequent copy pro- 
grams to show their prowess by provid- 
ing the capabilities to copy the copy 
protected copy programs. And so on 
and so on. 

The Amiga has not escaped this syn- 
drome. From the day of its introduc- 
tion we have found copy protected soft- 
ware to be readily available. These pro- 
grams were closely followed by Marau- 
der from Discovery Software Interna- 
tional. In spite of its rather rambunc- 
tious name. Marauder did a reasonable 
job of copying the software available 
at the time. However, as the copy pro- 
tection on the Amiga matured, it was 
gradually left behind. 



Yes, that's a 
Workbench 
screen. To get 
it, boot up 
Marauder II, 
switch screens 
with the left- 
Amiga and n 
or m combo 
and pull down 
the Workbench 
screen a hair, 
READER SER- 
VICE NO. m 
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Explore the Potential 
of Amiga! 
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NEW YORK 
October 10-12, 1987 



LOS ANGELES 
January 22-24, 1988 

Featuring 



CHICAGO 
July 22-24, 1988 



z 
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Keynote Sessions 

Jay Miner, the Father of the Amiga™, will open 
the New York AmiEXPO. R. J. Mical, the 
Designer of Intuition, will provide insights into 
software development. 

Exhibition Hall 

A sampling of exhibitors: 

Activision, Inc. 

Amazing Computing 

Amigo Business Computers 

ASDGJnc. 

Brown-Wagh Publishing 

Byte by Byte 

Central Coast Software 

Computer Systems Associates 

Creative Microsystems, Inc. 

Firebird Licensees, Inc. 

Lattice, Inc. 

Liquid Light, Inc. 

Manx Software Systems 

Microillusions 

NewTek, Inc. 

New Horizons Software 

PiM Publications, Inc. 

Octree Software 

Word Perfect Corporation 

Amiga™ is a registered trademark of 
Commodore- Amiga, Inc. 



Development Forums 

Intensive working sessions 
Amiga developers, such as 
specific products. 



with the 
NewTek, 



leading 
detailing 



User Seminars 

• The Architect's Amiga 

• Art Direction and the Amiga 

• The Amiga in Video Production 

• Amiga MK)I: Lights, Sound, Action! 

• The Ultimate Game Machine, Amiga 

• Amiga's Desktop Color Publishing 

• "Vax in a Box" - Amiga Engineering 

* AND MORE * 

For information call 800-32-AMlGA (in New 
York call 212-867-4663) or complete the form 
and return it to: 

AmiEXPO Headquarters 



I YES! Send me more info on AmiEXPO! 

I 

|Name 

I Company ^ 

I Address 

I 

I 

I Telephone 



■6? 




Return form to: 
AmiEXPO Headquarters 
301 East 43rd Street, Suite 301 
New York. New York 1 001 7 



'\3l££. <Sti.iiLt cSofiwaxe, One. 



538 S. Edgewood 

La Grange. IL 60525 

(312t 352-7323 

Super Disk Utilities 

The ultimate utilities disk tor Itie C128 1 1571 . IncludKl among 
jb many features are 

Two drive coitr (tiogiam lot the 1571 

Single ijrrve ca|)y program lor the 1571 

File nnsciatcli utility 
Create auto-inot utility 

Lodi I unlock files utility 

File iMpiei (or on* or two 1571's 

Utility to ffKmat in 1541. 1571 or IBM system 34 lotmal 

CP/M Plus disk i»|)ief 

Direct DOS commands 

IVnalyzt disk formal utility {including Commodore I alitti 
disk (ofmatsi 

Write protect utility 

Disk Editor - Indrvidualty trace tiles, edit in hex or ASCII 
simultaneoitsly. print in hex and ASCII to any sector on disk 

CP/M Plirs disk etiitoi 

RAM Writer - Read % write (o drive RAM 

ROM fleaifer - Head drive ROM 

Assemhte/Oisassemlile drive RAM ( ROM 

Erase a track or bulk erase a disk 

Most utilities also work m 1541 

And much, much more' 

A complete utilities disk lor only $39,951 

1541/1571 Drive Alinnment 

154t/t5?1 Drive Alignraent reports ttie alignment condition of 
the disk dirve as you perform adjustments. On screen help is 
available while the program IS running. Works on the 1541 . 1 571 
in either 1541 oi 1571 mode. Ce4. IM. C12a m eitlier 64 or 128 
mode' Aiitobools ID all mo(Jes' Manual iitcludes instructions on 
how to load alignment program even wlien the drive is so 
misaligned that it will not load anything else Eliminate 
downline i costly repairs' Only {34.95! 

Super Disk Librarian 

Full featured disk cataloging & littrary system for the C128 in 
12! mode Catalogs up to lOOl disks and 15200 program names' 
Operates in fast mode with S0 column display Reads S catalogs 
1541. 1571 % CP/M Plus disk directories. Reads heavily 
protected liisks Calalos up to 25 programs on a disk witli a 
single keyptess or selectively catalog programs. Stores in seven 
categories: Games. Education. CP/M. Archival, 
relecommunications. Ulililities or Productivity. Recall hy 
category, program name, disk name or locater number Printer 
nitput isctiides library indei. lull library report mastef program 
list, category program list h disk labels. A second drive can be 
adiiressed as a data disk Only S29.95I 

Super 64 Librarian 

Complete disk cataloging and library system lor llie C64 Reads 
& files disk directories in 15 user -defined categories. Individual 
selection of fira^ram names to be filed. Includes space for user 
comments alnut prograrrs. Recall by category, program name, 
etc Printer output includes disk labels. Catalogs approximately 
200 disks dependant upon number ol programs and length of 
user comments Organize yotir C64 disk library lor only 
SZ9.9S! 

FREE SHIPPING 5 NANOLINGI Illinois residents add B% 
sales tax. Send check or money order to: 
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Frte Spirit Sollwara. inc. 

538 S Edgewood 
La Grange, IL 60525 
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Tlie people at Discovery Software 
did not remain idle. Following a brief 
hiatus they presented Marauder U 
(seems everybody is into sequels these 
d^s), probably the most effective cof^ 
program for the Amiga available at this 
time. 

Marauder 11 has all the earmarks of 
a successful copy program. It has a 
flashy screen to which the accompany- 
ing screen shot does not do justice. The 
rainbow of colors continuously scroll 
up the display. It generates a startling 
digitized sound when it boots up. It has 
a separate routine for copying the copy 
protected disk of its closest competi- 
tor, thereby clearly demonstrating its 
superiority. It is properly adapted for 
the Amiga with an easy to use, icon- 
based, mouse-driven interfece. and it 
supports multitasking. Most important 
of all it is easily upgradable at reason- 
able cost, which permits it to indefin- 
itely forestall its own obsolescence. 

The key to Marauder fVs upgradabil- 
ity is also the basis of its intelligence. 
Rather than attempting to copy via 
brute force duplication, Marauder II 
utilizes a "brain module" for the basis 
of its operations. The brain module 
represents the intelligence of its pro- 
grammers. It automatically recognizes 
a host of copy protected programs and 
provides the data which allows Mar- 
auder II to duplicate this program, and 
in most cases also strip the copy pro- 
tection at the same time. In essence. 
Marauder II is a parameter copier with 
a built-in parameter list. 

The brain module is a standard Am- 
igaDOS file which may be easily in- 
stalled by the user. New brain modules 
are available to registered owners for 
a $15 fee. This fee covers the cost of 
developing new parameters, which is 
done on a continuous basis. Brain 
modules can be ordered by mail, or 
they can be downloaded from Discov- 
ery Software's own bulletin board. It 
is not necessary to purchase every is- 
sue of the brain module to be fully up 
to date. Each brain module incorpor- 
ates all the program parameters of all 
the preceding brain modules. 

Marauder II also offers several mun- 
dane advantages over the AmigaDOS 
Diskcopy command. To begin with. 
Marauder II can make an exact dupli- 
cate of a disk, something that Diskcopy 
does not do. Marauder II is also slight- 



ly faster than Diskcopy, at 87 seconds 
versus 102 seconds more or less. Mar- 
auder II is also capable of making up 
to four simultaneous copies of a disk. 
Of course, your Amiga wUI need three 
external disk drives as well as the in- 
ternal drive, and at least one megabyte 
of expansion RAM. If your system has 
the extra RAM, then the disk can be 
read into memory and multiple copies 
can be generated forever after without 
any further disk reads. Even without 
the extra memory, you can produce up 
to three simultaneous copies if you have 
the external disk drives. 

Although Marauder II is fully auto- 
matic and works best with its default 
settings, there are several options avail- 
able on its pull-down menus. The de- 
fault analytical setting may be defeated 
by choosing the verbatim option. This 
turns off the program's ability to ana- 
lyze the original disk and generates an 
exact duplicate if possible. You may 
also turn on the verify option, which 
checks the destination copy for devia- 
tions from the original. This may be 
useful for detecting a damaged destin- 
ation disk. Some esoteric operations 
may also make use of Marauder II's 
ability to synchronize with the disk's 
index hole while copying. 

Marauder II includes several stand- 
alone utilities on its Workbench disk, 
not all of which are described in the 
manual. The Marauder II manual also 
forms the basis of its own copy pro- 
tection. When you first boot up you 
will be required to enter a word from 
a specific location in the manual . The 
specific word changes each time you 
boot up. Getting back to the stand- 
alone utilities, if you examine both the 
root directories and the c directory you 
will find the following: 

c/IDent: File Identifier. Reports the 
fde name, file size, checksum and date 
information. 

c/Peek: Displays the hex and ASCII 
contents of a file. Peek is similar to the 
AmigaDOS Type command, with hex 
option enabled, except it lets you spe- 
cify the starting position in the file and 
the number of bytes to display. 

c/XFind: Locales a specified pattern 
of hex bytes and reports on the loca- 
tion of each match. 

Diskwipe: Completely and quickly 
clears an entire disk. This is slightly 
faster than reformatting the disk. 
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Decoder: Completely decrypts early 
Electronic Arts software to permit fast- 
er loading. 

DiskErr: Scans an entire disk and re- 
ports all errors. 

Most of these utilities were put on 
the Marauder II distribution disk to 
permit the decrypting and copying of 
new software by remote control. If you 
should come across a program which 
Marauder 11 cannot copy and if you 
happen to give Discovery Software a 
call, you may be instructed on the use 
of these utilities on the recalcitrant soft- 
ware. If the conditions are right you 
will be rewarded with a working copy 
and Discovery Software will have a 
new parameter for the brain module. 

Multitasking is possible with Marau- 
der 11. The underlying Workbench 
screen may be accessed with the left- 
Amiga and n or m key combinations. 
Of course disk operations are not pos- 
sible, as Marauder II takes control of 
the disk drives. Marauder II may be 
easily installed on any Workbench disk 
using the provided utility. 

Marauder II is a worthwhile invest- 
ment for serious Amiga users. As of 
this date. Discovery Software has al- 
ready issued seven brain module up- 
dates. Updates have been coming at the 
rate of once a month. These people are 
certainly dedicated to their task. 

Discovery Software International, 

903 East Willow Grove Avenue, W^nd- 

moor, PA 19U8 (phone: 215-546-1533). 

—Morton Kevelson 

AMrCA TRACKBALL 
Zebra Systems, Inc. 
Amiga 
Price: $49.95 

If you want to really make mouse- 
tracks with your Amiga, then replac- 
ing its mouse with a trackball may be 
just the way to go. We have in general 
been most satisified with the mouse as 
an input device for the Amiga. We 
found it takes very little practice to be- 
come adept at its tail twitching and ear 
clicking. However, we have been en- 
countering some difficulty with the 
other denizens which inhabit the desk- 
top upon which our Amiga resides. 
These creatures have developed the in- 
sidious habit of encroaching ufwn the 
territory which our mouse has reserved 
for its own use. 



We have found the Amiga's mouse 
to be an extremely territorial beast. 
When crowded it will frequently react 
by leaping off the desktop and thereby 
becoming nearly useless. Zebra Sys- 
tems has come up with an alternative 
to the territorial mouse. It seems that 
WICO, the well-known maker of stur- 
dy joysticks and trackballs, has left that 
field of endeavor. Zebra Systems has 
acquired a quantity of the trackballs 
and in a fit of ingenuity has decided 
to modify them for use with the Anu- 
ga. Since the hardware of a trackball 
is essentially an inverted mouse, it was 
only necessary to design a single circuit 
board to replace the one made by 
WICO. 

The requirement for two push but- 
tons means that the modified trackballs 
were originally intended for the Apple 
computers. On this model a single large 
push button is situated at the upper left 
hand comer of the trackball. This but- 
ton has been wired up to correspond 
to the left mouse button. A second, 
smaller button is situated just below the 
first on the left side. This button cor- 
responds to the right mouse button. In 
addition, 21ebra Systems has installed 
a jack and adaptor cable to allow the 
mouse to be plugged into the trackball . 



s e C T I O N 

This enables only the push button func- 
tions on the mouse and not the move- 
ment functions. 

In use we found the arrangement to 
be most agreeable. As a rule the track- 
ball worked best for point and click 
type operations. The click-drag-release 
function was slightly awkward at first, 
although we were able to master it with 
either hand. With the addition of the 
mouse we found the availability of the 
push button on both sides of the key- 
board to be the best of both worlds. 
Elimination of the roaming mouse 
solved some of our desktop territorial 
problems. We also noticed that both the 
mouse and trackball cables were long 
enough to reach around the back of the 
computer, eliminating some of the clut- 
ter around our keyboard. 

The supply of surplus modified 
WICO trackballs is definitely limited, 
so you may have to hustle to gel one. 
Alternatively, if you already own a 
trackball and you have some ability 
with electronic construction, well sup- 
ply a schematic next month which may 
be sufficient to let you modify your 
own. 

Zebra Systems, Inc., 78-06 Jamaica 
Ave., Woodhaven, NY 11421 (phone: 
718-296-2385). -Morton Kevelson 




BACKUP PROTECTED 
SOFTWARE FAST. 

From the team who brought you 
Copy II Plus (Apple), Copy II PC (IBM) 
and Copy II Mac (Macintosh) comes 
a revolutionary new copy program for 
the Commodore 64/128 computers. 

• Copies many protected 
programs -automatically. (We 
update Copy II 64/128 regularly to 
handle new protections; you as a 
registered owner may update at 
any lime for $15 plus S3 s/h.) 

• Copies even protected disks in 
under 2 minutes (single drive). 

• Copies even protected disks in 
under 1 minute (dual drive). 

• Maximum of four disk swaps on a 
single drive. 



• Includes last loader, l2-second 
format. 

Requires a Commodore 64 or 128 
computer with one or two 1541 or 
1571 drives. 

Call 503/244-5782, M-F, 8—5 

(West Coast time) with your ^ ^ 
in hand. Or send a check 
for $39.95 U.S. plus $3 s/h, $8 
overseas. 

$39.95 

Central Point Software, Inc, 
9700 S.W. Capitol Hwy. #100 
Portland, OR 97219 

CenttdFamt 



Software 



Backup utHities also available for the fBM, Apple H. Macintosh and Atari ST 

This product 15 provided for the fKjrpose otenabimg you to make archival copies only 
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Art 6«ifl«ry Dtok Sal« 

The images on these pages are now available on a monthly 
disk. Multicolor images are supplied in Koala format, while 
high-resolution images are in DOODLE! format. Included are 
a slide show for easy viewing, along with a bit map dump for 
your 1525 printer or properly interfaced equivalent. A sample 
Art Gallery disk with slide show and printer dumps is $10; 
or send a stamped and self-addressed envelope {business size) 
for a listing of available An Gallery collection disks. Prices 
shown are for US and Canada. All others add S3 per disk. 
New York State residents please add appropriate sales taxes. 
Disks may be ordered from Morton Kevelson, P.O. Box 260, 
Homecrest Station, Brooklyn, NY 11229. 

Centribtfte to Ahorf* Art Ottttwy 

The Ahoy! An Gallery offers the opportunity for fame and 
fortune to any and all aspiring Commodore artists. Simply send 
Morton (see address above) your work on disk indicating the 
drawing package or file format of the images. Inclusion of a 
self-addressed post card will guarantee an immediate response. 
Ail graphics produced on the C-64/ C-128, Plus/4, and Amiga 
computers are eligible. In exchange your work will receive 
the opportunity for display in these pages. All published works 
will receive royalties based on the monthly Art Gallery disk 
sales. Also, both published and unpublished images may be 
included on ^rr Gallery collection disks. 

Note that the Art Gallery is not a contest. Published pic- 
tures are selected in an arbitrary and capricious feshion 
the Ahoy! Art Director based solely on the artistic merit ol 
the individual images. 




58 AHOri 





AHOY! 59 



ARCHER 



FOR THE Ci28 



If I have any strong memories from my youth, they are 
probably of the arcades. There always seemed to be 
an incredible, surrealistic adventure waiting within 
the confines of the darkened, carpeted interiors: a 
great struggle between good and evil I could not find in 
the real world, always only a quarter away. 

I was never much interested in the standbys like Defend- 
er ox Pac-Man, but confess to having been in love with the 
old classic Venture. You remember- the little smiley fece 
that battled a host of vile fiends with only hits wits and 
arrows, descending deeper and deeper on a lone journey 
into the netherworld in quest of glory below. What cour- 
age! What cunning! I saw volumes of character carved in 
the lines of that simple, confident grin. 

They say the best games are the ones you make for your- 
self, and I admit the game Archer was inspired by that swell 
arcade hit, now long since gone to its resting place in the 
silicon graveyard. 

This is no bare-bones game, either. It utilizes 25 sprite 
shapes, 3 interrupt driven songs, fast machine language aided 
action, 10 dungeon levels and 5 different floor plans, each 
with assorted creatures, traps, and puzzles. It also has an 
intriguing title screen with a smooth scrolling backdrop. 

The program is a hybrid BASIC 7.0/machine language 
game, and the movement is smooth and exciting. Youll need 
a high quality joystick with good movement in the diagon- 
als plugged into Port 2 to play. 

The program will take a moment to load the interrupt 
and sprite data before the title screen appears. Press the 
fire button to start the game. 

The first thing you'll always see is a large overview of 
the dungeon level you're on first, with the little green fece 
representing you. Guide the Archer to the doors of each 
of the rooms in the dungeon while dodging Loog and Moog, 
two troll sentries you'd do well to avoid, because your ar- 
rows will never pierce their rough hide. 

Upon your first entry into any dungeon level , the floor 
will be littered with a sampling of diamonds which you can 
pick up as you go for bonus points, each diamond worth 
LEVELX50. 

When you enter the door of the rooms, the screen will 

blank for a moment, then cut to a blown-up interior of the 

5 inside of that room, and a blown-up version of the Archer, 

2 complete with bow and arrow. To move, simply push the 

t joystick in the desired direction. To fire, point and push 

the button. 

Each dungeon has several different rooms, each possess- 
ing a different treasure. You must penetrate each room and 
collect the treasures before the doors to the staircase at the 
upper left will open, enabling you to descend to the next 
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level. Each time you pick up a treasure, it will appear in 
the "booty" bracket at the bonom of the screen. Notice that 
when you reemerge into the large scale map, Loog and 
Moog have gathered up any diamonds remaining. 

The value of the treasures you collect depends on the lev- 
el and type of menace in the room. Each dungeon creature 
you kill is worth LEVEL X 1000. You can elect just to collect 
treasure, or go for the points and try to clean out the rooms 
of monsters as you progress. 

There are more than monsters to fight here. There are 
also "alcoves," litfle traps with treasure inside guarded by 
shifting walls, or rotating panels. Timing and precision are 
required to survive them. 

If you make it to the tenth level, you will definitely be 
one of the elite, because I have only made it once myself 
as of this writing. Things get really frantic in the more ad- 
vanced levels of the dungeon, requiring anticipation and 
accurate, cobra-fest reflexes. 

You start the game with three men, with a possible bo- 
nus man when you make it to level five. The remaining 
Archers are displayed at lower right. 

The listing is pretty long, so save a copy before running 
it (as you should always do anyway) in case a typo error 
in the data statements should cause the interrupt to crash 
the computer. 

There are three songs that play in the background during 
the game, tentatively titled "Archer's Theme" (title screen). 
The Troll's Dirge" (dungeon overview) and "Archer's Cru- 
sade" (inside rooms). You may recognize the flute tune that 
plays behind the title screen -it's lifted from a melody by 
Mozart. D SEE PROGRAM LISTING ON PAGE 93 
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Continued from page 12 

included here will procure you a copy 
of Plmetfall for $14.95. 

Infocom, Inc., 617-492-6000 (see ad- 
dress list, page 12). 

JFORTH 

Based on the Forth '83 standard and 
supporting FIG and Forth-79 as well. 
J Forth for the Amiga ($99.95) contains 
both an interpreter and a compiler, pro- 
viding an interactive environment that 



i It's a 



It's an interpreter. It's a compiler. 
READER SERVICE NO. 169 

makes it possible to compile programs 
directly from the keyboard. A tech- 
nique known as JSR-Threading ties to- 
gether compiled programs, making all 
code produced by the compiler direct- 
ly executable. 

Delta Research, 415-485-6867 (see 
address list, page 12). 

BUYER BEWARI 

Bad news about Schneider Software, 
whose offering of public domain disks 
was publicized in March's Scuttlebutt. 
We've heard from numerous readers 
who sent the $2.00 Schneider reques- 
ted for a disk-based catalog, received 
back their cancelled checks, but... you 
guessed it. No disks. And no answers 
to the letters we've written to Schnei- 
der trying to redress the problem. If 
you've lost a deuce to these big-time 
operators, write to the Pennsylvania At- 
torney General's Bureau of Consumer 
Protection at 358 State Office Build- 
ing, 100 Lackawanna Avenue, Scran- 
ton, PA 18503 (phone: 317-963^913). 
If you won't do it for the two dollars, 
do it to help keep these folks from try- 
ing for similar mail order bonanzas in 
the future. 
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ELECTRONIC ONE* 

CftU f6I»J 86«-9994 * P.O. Box 1342 8 • COLUMBUS. OHIO 43213 
Qz commodore 



unowMi 

MC 64k COMPUTER 1S9 99 

128Cl28kCOMPUTEfl Z29 99 

I541C DISK DRIVE 169 99 

1571COISK DRIVE 239.99 

1S02C MONITOR 189 99 

19a2A RGB MOMTOR 269 99 

COMPUTER ACCEUORIES 

1351 MOUSE 39 99 

RS 232 INTERFACE 39 99 

MESSENGER MODEM 34 99 

AVATEX 1200 MODEM 79 99 
AVATEX 1200HC 

MODEM 109 99 

XETECJR 39 99 

XETEC SR 56 99 




PniMTERS 




STARNX10 


199 99 


STARNXIOC 


219 99 


FORTIS DM 1310 




(130CfS| 


199 99 


STAR POWER TYPE 


169 99 


PANAMNIC 10811 


189 99 


PANASONIC I091r 


259 99 


SEIKOSHAlOOOVC 


169 99 



CALL FOR 

OISKEHES JOYSTICKS 

ACCESSORIES 



SOFTWARE 

ACE OF ACES 
HEART OF AFBICA 
ONE ON ONE 
aiGHTWGHT 
TOUCH FOOTBALL 
KAJtATE CHAMP 
SILENT SERVICE 
TAG TEAM 

WRESTLING 
LEADER BOABO 
GUN SHIP 

SUBLOGC FOOTBALL 
SUBLOGIC BASEBALL 
UP PEfllSCOPE 

SUB BAniE 

GAME S7AR 
BASKETBALL 

TENTH FRAME 

SPY VS SPY 

KAflATEKA 

COMMAMOO 

AUTODUAL 

BARDS TALE II 

CHESTMASTER 
2000 

FLIGHT SIM II 

JET 

SKY FOX 

ARTIC FOX 



2299 

999 
999 
16 99 
999 

23 99 
18 99 

24 99 
22 99 
22 99 
29 99 
26 99 
1B99 
24 99 

18.99 
2499 

999 
18 99 
24 99 
29 99 
1199 

24 99 
29 99 
26 99 
22 99 
24 99 



SOFTWARE 
GEDS 

PRINT SHOP 
BUSINESS FORM 

SHOP 

NEWSROOM 

MACH5 

MACH 128 

FAST LOAD 

TUftBO LOAD t SAVE 

VWRD PRO 

W/TURBO 
WORD PRO 

12aw/FILE 
SPREADSHEET 
FILE PRO 64 
POWER C 

PAPERCLIP W/SPELL 
SUPERBASE64 
SUPEFtBASE 128 
POWER ASSEMBLER 
P0CK£TWRiTER64 
CERTIFICATE MAKER 
DATA MANAGER 128 
VWRD MANAGER 128 
SWIFT CALC 128 
SWlfTTAX 
PAPERCLIP II 
OOPYII 
TOY SHOP 



39 99 

27 99 

-22 99 
29 99 
22 99 

27 99 
24 99 
(7 99 

22 99 

22.99 
22 99 
)8 99 
22 99 

28 99 
49 99 
59 99 

29 99 

27 99 

28 99 
39 99 
39 99 
39 99 

33 99 
49 99 
24 99 

34 99 



SOFTWAfTE 
SPECIALS 

CHAMP WRESTLING 
MARBLE MADNESS 
LORDS OF CONQUEST 
StCYFOX 
BARDS TAIL 
ONE ON ONE 
MAIL ORDER 

MONSTER 
ACE OF ACES 
ARCTIC FOX 
KILLED UNIIl DEAD 
HIGH ROLLER 
AMERICAS CUP 
TOUCHDOWN 

FOOTBALL 
VCHIMATAJUDO 
FIST 

PARALLAV 
FLIGHT SIM II 
SILENT SERVICE 
LEADER BOARD 
DEADLINE 
SATINS' HOLLOW 
RALLY SPEEDWAY 
HARDBALL 
MICRO LEAGUE 

BASEBALL 
SUPERBOWL SUNDAY 
SUPERBOWL STATS 



1899 
1899 
24 99 
24 99 
24 99 
11-99 

n99 
18 99 
24 99 
1899 
1699 
24 99 

1199 
18 99 
18 99 
18 99 
29 99 
22 99 
22 99 
499 
499 
499 
18 99 

24 99 
1899 

14 99 
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INTERNATIONAL: ACTUAL FREIGHT CHARGED ON ALL OHOIRS OUTSIDE THE CONTINENTAL UNITED STATES INCLUOING A P 
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CALL ELECTRONIC ONE r6J4J 864 999« OR WRITE 
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The money-saving subscription rates for Ahoy! magazine and the Ahoy! 
program disk are now even lower! 

If you subscribe to the Ahoy! Disk Magazine — magazine and disk pack- 
aged together -youll receive the two at substantial savings over the indi- 
vidual subscription prices! 



YEARLY SINGLE 

ISSUE PRICE 

(12 ISSUES) 

Magazine: $ 35.40 

Disk: $107.40 

TOTAL: 5142.80 



SEPARATE 

SUBSCRIPTION 

PRICE (12 ISSUES) 

Magazine; $ 23.00 

Disk: $ 79.95 

TOTAL: $102.95 
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Use the postpaid card bound between pages 66 and 67 of this magazine 
to subscribe. (Canadian and foreign prices are higher.) 

The Ahoy! Disk Magazine is also available at Waldenbooks and B. Dal- 
ton's bookstores, as well as other fine software oudets, 
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Continued from page 40 

computer to be run in FAST or SLOW mode with the 80 
column display. Upon returning to 80 columns from 40 col- 
umns, the computer will always be in SLOW mode. 

USING IT 

You may assemble this program yourself if you want to 
modify or relocate it. You may change the ORG statement 
in line HI. You may run the BASIC program SCRNSWAP 
LOADER on page 84 if you prefer. This BASIC program 
POKEs the machine language object code into memory, 
then performs a SYS 5376 to run the initialization portion. 

Be sure to save the BASIC program before running it. 
If it gives a DATA ERROR message, carefully check your 
data statements and correct any errors. Resave the program 
after any changes. 

One other possibility is to add line 255 to SCRNSWAP 
LOADER: 

255 BSAVE "SCRNSWAP. 0", P5376 TO P5523 

This will create an object file called SCRNSWAP.O on the 
disk. If you have to correct and rerun the BASIC program, 
you must first scratch the old version of SCRNSWARO each 
time. Type SCRATCH "SCRNSWARO" before rerunning 
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the program. 

If you added line 255, then the next time you start your 
computer, you can load and execute the program with the 
statements 

BLOAD "SCRNSWAP.O" : SYS 5376 

This is faster than running the original BASIC loader pro- 
gram. The real advantage is that these statements can be 
part of your autoboot program. (You do have an autoboot 
program to load your favorite utilities, set your screen col- 
ors, and customize your function keys, don't you?) 

CHANGING MODES 

How is the screen mode changed? There are several ways 
to switch between the 40 column and the 80 column dis- 
plays. The Escape-X sequence toggles between the two 
moides. Press and release the Escape key. Then press the 
X key. 

Another way to change modes is to enter or execute the 
GRAPHIC command. GRAPHIC 5 selects 80-column 
mode. GRAPHIC followed by numbers from through 4 
selects the VIC 40 column output. Refer to the Program- 
mer's Reference Guide for details on this statement. 

Either the Escape-X or the GRAPHIC commands may 
be used within a program as well as in direct mode. To 
execute Escape-X. use PRINT CHR$(27rX" since CHR${27) 
is the code for "Escape". 

Another way to change screen modes is to press the 40/80 
DISPLAY key, then perform a warm restart (hold RUN 
STOP and press RESTORE). The 40/80 DISPLAY key is 
read only during warm or cold bootup. If the key is down 
during bootup, 80 column mode is selected. Otherwise 40 
column mode is selected. 

Entering G064 and responding Y to the prompt will put 
the computer into C-64 mode. This automatically selects 
the 40 column output. 

To disable the SCRNSWAP routine and any other resi- 
dent IRQ or SYSTEM_VECTOR wedges, enter this as 
one line in direct mode: 

POKE 2560,3 : POKE 2561,64 

then press RUN STOP/RESTORE. These statements re- 
place the original vector at $A0O/$AOl. The reboot then re- 
stores the IRQ vector. To reenable SCRNSWAP, you could 
enter SYS DECCISOA"). 

Hopefully when you write your next IRQ wedge, you will 
use the techniques we have discussed so that your routine 
does not clobber any other wedges which are present. 

Anyone with a hot soldering iron and some perseverance 
should be able to make this project work. Write and tell 
me of your success or problems with it. Also let me know 
if you like hardware and software articles such as this. 

If you are not already taking advantage of 80 column mode 
on the C-128, you should consider an inexpensive green 
screen. The 80 column mode makes the C-128 a serious 
programmer's computer. Electronically controlled screen 
swapping makes the C-128 even better. D 

SEE PROGRAM LISTINGS ON PAGE 83 
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FSD-2 EXCELERATOR PLUS 

Emerald Component International 
Commodore 64 
Price: $159.00 

Clone is the current buzzword in the 
microcomputer industry. It has reached 
the point where the announcement of 
a new line of microcomputers from a 
certain well-known manufacturer is im- 
mediately greeted by massive specula- 
tion as to how soon the new machines 
will be cloned. On the other hand, the 
microcomputers manufactured by 
Commodore have never been cloned. 
This phenomenon may be easily ex- 
plained. Commodore's microcomputer? 
are so reasonably priced to begin with 
that the clonemongers have no margin 
for profit if they try to undercut Com- 
modore's prices. Furthermore, the ex- 
tensive use of proprietary hardware and 
software makes it virtually impossible 
to legally construct a properly fiinction- 
ing clone of a Commodore micro such 
as the C-64. 

On the other hand, we have found 
diat Commodore peripherals have been 
cloned from the very start. The rea- 
son for this is that for the most part 
Commodore does not manufacture its 
own peripherals. Items such as print- 
ers and disk drives are made for Com- 
modore by major manufacturers of 
such products. Thus it is possible for 
a clone maker even to contact the or- 
iginal contractor for the Commodore 
peripheral and come to market with a 
competing product. 

The 1541 disk drive in particular has 
received much attention from the clone 
makers. The basic hardware of the disk 
drive mechanism has been fairly well 
standardized for several years. Double 
sided, double density drive modules for 
the IBM PCs sell for well under $100. 
Single sided, single density modules, 
such as for the 1541, are even less. As 
a resuh it is very easy for a manufec- 
turer to put together a 1541-compati- 
ble disk drive. 

Distributors have also been very 
swift to capitalize on the 154rs repu- 
tation for misalignment under the dur- 
ess of some copy protection schemes. 
Retailers in particular are interested in 




Top: FSD-2 and 
its power supply 
atop the 1541. 
Middle: bottom 
view, showing 
direct drive 
TDK module, 
6502 micropro- 
cessor, two 6522 
ViAs, 16K of 
ROM, 2K of 
RAM, and DIP 
switches. Bot- 
tom: top view, 
showing re- 
maining circuits. 
READER 
SERVICE NO. 167 
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switching prospective customers to 
1541 clones, as they generally have a 
higher markup. 

The FSD-2 Excelerator Plus is an- 
other entry in the 1541 clone market. 
Its most distinguishing feature is its 
small size. The dimensions are a mere 
5%" wide by 1%" high and lOU" deep. 
This is only about one fourth the vol- 
ume occupied by a 1541 disk drive. In 
all fairness, the additional bulk of the 
Excelerator Plus's external power sup- 
ply should be considered as well. This 
sealed module, roughly the size of a 
C-64 power supply, adds about 30 per- 
cent to the volume of the disk drive. 
Even at that, the FSD-2 is less than half 
of the total volume of the 1541. Of 
course, the power supply's five foot 
long input and output cables let you 
find a convenient location for it. 

The version of the Excelerator Plus 
we looked at is built around a half- 
height, direct drive TDK disk drive 
module. The main circuit board con- 
tains the usual collection of 1541 com- 
ponents consisting of a 6502 micropro- 
cessor, a pair of 6522 VIAs, 2K of 
RAM, and the operating system in 16K 
of ROM. The remainder of the circuit- 
ry is made up of standard TTL inte- 
grated circuits. To achieve its compact 
construction, the main circuit board has 
been divided up into three interconnec- 
ted modules. When we opened the 
drive up we noticed that some of the 
connecting plugs were coming loose. 
At this point we made sure that all the 
connectors were properly seated. 

As with similar lever action disk 
door designs, the disk has to be manu- 
ally extracted from the drive. We found 
that the disk well was rather deep, mak- 
ing it slightly awkward to extract the 
disk. The front panel sports a single 
LED which glows green to indicate 
power on and red to indicate drive ac- 
tivity. The TDK drive mechanism has 
a mechanical track one stop, similar to 
the original 1541 drives. As expected, 
the drive head rattled when formatting 
a disk or upon encountering a disk er- 
ror. The acoustics of the compact me- 
tal case minimized the sound coming 
from the drive during these activities. 
The drive's device number may be eas- 
ily changed via a pair of miniature 
switches which are accessed through 
a cutout in the bottom of the drive. 



Operating speed of the Excelerator 
Plus was comparable to the 1541 disk 
drive. The only notable speed improve- 
ment was in formatting a disk. The ta- 
ble gives some sample times in seconds. 



Operation 


FSD-2 


1541 


Format 


56 


85 


Load lOK 


26 


26 


Save lOK 


30 


31 



The real concern of the end user with 
regard to 1541 clones is compatibility. 
The problems with compatibility are 
not with the standard Commodore 
DOS commands but with the nonstan- 
dard operations performed by many 
purveyors of commercial soft\rare. 
Many of these packages employ copy 
protection schemes which may not 
work on non-Commodore disk drives. 
The package label for the FSD-2 indi- 
cates "Xjuaranteed Compatibihty"; how- 
ever, the enclosed warranty card does 
not indicate the nature of diis guaran- 
tee. Due to the large number of com- 
mercially protected C-64 software pro- 
grams, we were unable to try out the 
FSD-2 with all of them, so we picked 
the ones we felt vrauld be most likely 
to lead to difficulties. 

We found no compatibility problems 
with the FSD-2 when we tried it out 
with CEOS, Epyx Fastload, and a 
game from Accolade Software. We 
even had no problems with Super Kit 
1541, well-known for its finicky beha- 
vior with 1541 disk drives which are 
only slightly out of alignment. All this 
compatibility was truly astounding. So 
astounding, in fact, that we took the 
trouble to take a closer look at the 
FSD-2. 

As a first step we extracted the drives 
ROMs, slipped them into a Promen- 
ade, and compared them to the contents 
of a 154rs ROM set. We were amazed 
to find that the code was entirely dif- 
ferent. We were even more amazed 
when we noticed that the contents of 
the FSD-2's ROMs would not disas- 
semble into standard 6502 opcodes. As 
a second step we replaced the ROMs 
and used the DOS's memory-read com- 
mand to extract the entire contents of 
the FSD-2 ROMs. At this point our 
amazement turned to enlightenment as 
we compared the resulting code to the 
1541 ROMs. It was idenUcal in every 
respect! At this point we were ready 



to guarantee the compatibility of the 
FSD-2 ourselves. 

Apparently one or more of the ROM 
data lines on the FSD-2's circuit board 
have been swapped. The ROM code 
was adjusted accordingly. As a result 
the code looks fine to the drive's 6502 
microprocessor. However, a casual in- 
spection of the ROMs will reveal only 
gibberish. We have been informed ty 
a reliable source that Commodore has 
obtained an injunction to prevent the 
distribution of the FSD-2 in Germany. 
The presence of the FSD-2 at the last 
World of Commodore was also blocked. 
In this country the copyright status of 
the I54rs ROM seems to be undeci- 
ded. The possibility exists that Emer- 
ald could be able to legally distribute 
the FSD-2 in the US. 

Overall the FSD-2 Excelerator Plus 
is a competitively priced albeit plagiar- 
ized alternative to the Commodore 1541 
disk drive. It will be especially appeal- 
ing to users who will benefit from the 
small space occupied by the drive. It 
is certainly a worthwhile consideration 
as a second disk drive. 

Emerald Components International, 

541 Willamette, Eugene, OR 97401 

(phone: 800-356-5178/503-683-1154). 

—Morton Kevelson 

GRAPHICS TRAHSFORMER 
Complete Data Automotion, Inc. 
Commodore 64 
Price: $34.95 

Last month we presented a round- 
up of graphics conversion packages 
along with a tutorial on bit mapped 
graphics for the C-64. No sooner had 
the ink dried on our report than another 
graphics conversion package arrived on 
our doorstep. While we suppose we 
should be used to this, as it seems to 
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happen often enough, somehow we are 
always surprised by the many devious 
ways of the imp of perversity. We 
wouldn't take the issue to heart if the 
package were a real dog and not worth 
considering in any event. However, the 
Graphics Transformer turned out to be 
a contender for the top spot on our list 
with some powers and abilities not 
found in any of the others. 

If nothing else, the Graphics Trans- 
former recognizes a greater selection 
of full bit map formats than any other 
package, as is readily apparent from the 
following list. You will notice that the 
icon formats, such as those used by 
Print Shop and Newsroom, are conspic- 
uous by their absence. We have been 
informed that a future update to the 
package will incorporate these formats. 

Graphics Transformer File Formats 
High-resolution Multicolor 



Art Studio 
Billboard Maker 
Cadpak 64 
Computer Eyes 
DOODLE! 
Flexidraw 
GEOS 
Prim Shop 
Sahara Abstraction 
Vidcom 64 
Stand Alone 
Multi File 



Animation Station 
Billboard Maker 
Blazing Paddles 
Flying Colors 
Graphics Magician Jr. 
Koala 
Kwik Paint 
Micro-Illustrator 
Paint Magic 
Peripheral Vision 
Picasso's Revenge 
Sorcerer's Apprentice 
Super Sketch 
Vidcom 64 
Stand Alone 
Multi File 

The Graphics Transformer will con- 
vert any of these file formats to any 
other of the listed file formats. This in- 
cludes the cross conversion from mul- 
ticolor to high-resolution bit mapped 
graphics and vice versa. Note that the 
Graphics Transfonner was the only 
package that would handle a ftill GEOS 
bit map, which may actually be as lat^e 
as eight standard sized C-64 bit maps. 
The Graphics Transformer automati- 
cally loads in a separate routine to han- 
dle the conversion of GEOS files. All 
the other conversion functions reside 
in a single program module. When 
converting from GEOS you will be giv- 
en the opportunity to scroll around the 
entire GEOS file and pick out a stan- 
dard 8000-byte bit map. 

The last two file formats under each 
heading are unique to the Graphics 



Transfonner. The standalone format 
creates a file which may be loaded and 
then run to display the image. You have 
the option of leaving the image on the 
screen or returning to the text display 
mode when exiting by pressing the stop 
key. The Multi File format lets you save 
the bit map image components as 
separate files. For high-resolution im- 
ages, these will consist of an 8000 byte 
bit map whose file name ends with 
.BIT and 1000 tytes of screen memo- 
ry whose file name ends with .SCN. 
Multicolor images will also generate 
an additional 1000 bytes of color mem- 
ory whose file name ends with .COL. 
The byte holding the multicolor back- 
ground color nybble isn't retained. 

The Graphics Transformer is entire- 
ly menu driven. Your initial task is to 
pick the format of the source and des- 
tination files. This drops you into the 
working menu where the actual con- 
versions take place. Files are selected 
from onscreen directory listings. Any 
number of files may be selected for 
conversion. If more than one file is se- 
lected, they will be done in sequence. 
If you do not care for the results of a 
single conversion, you have the chance 
to skip the file save function for that 
image. However, there is no way to exit 
back to the main menu without loading 
in all the preselected files. 

The directory listing may consist of 
files which are only in the selected 
source file format, or it may contain 
all the files on the disk. We found that 
the source file format listing would 
miss many of the Koala files which 
were actually on the disk. This forced 
us to use the complete directory list- 
ing to access all the Koala files. Se- 
lecting files from the complete direc- 
tory listing lets the Graphics Transfor- 
mer read in any disk file and treat it 
as the selected source file format. This 
would let you convert Koala format 
files which do not adhere to the Koala 
file naming convention. 

When doing a multicolor to high res- 
olution conversion or vice versa, the 
source file is displayed in the destina- 
tion file format upon loading. We found 
that it was not possible to view the file 
in its original format without some loss 
of information. 

The conversion is not fully automa- 
ted. For most files the user must exe- 



cute the Equalize command to com- 
plete the conversion. The Equalize 
command performs several operations 
depending on the conversion. When 
going from high-resolution to multi- 
color mode, Equalize will adjust the 
pixel bit pairs to point to screen RAM. 
Remember, only the 01 and 10 bit pairs 
will cause the VIC chip to look at 
screen RAM for color data. Bit pairs 
00 and 11 get their color data from the 
background nybble and color memoiy. 
These areas are filled with default val- 
ues, as they are not part of the orig- 
inal high-resolution file. 

When going from multicolor to high- 
resolution mode, Equalize transfers the 
two most popular colors, from the 
available four, into the corresponding 
character cell of screen RAM. It also 
doubles up the pixels to insure that the 
hi-res image corresponds to the original 
multicolor as much as possible. 

In addition to the basic format con- 
version, the bit map may be manipula- 
ted in several ways. All pixels may be 



$ WIN $ 
THE LOTTO 

With Your Computer! 

Forget random numbers. This program 
for home computers does an actual 
analysis of the past winning numbers. 
This amazing program will quickly pro- 
vide irou with all the data you need to 
predict which numbers will likely 
come up In subsequent drawings. All 
consistent lottery winners use some 
kind of system based on the past win- 
ners. Using the real power of your com- 
puter gives you a definite edge. It's 
menu driven and all you do is add the 
latest winners each week and the pro- 
gram does the rest In seconds. On 
screen or printer It shows hot and cold 
numbers, frequency, groups, sums-of- 
diglts, odd/even, wheels numbers and 
more. No thick manual to read. It even 
has a built-in tutorial. 

Ask your software dealer or call or 
write: 

/"^^ SOFT-BYTE 

I Soft ^^ ^"^ 5^' ^ '"'"^ 

\ OM-re Davfton. Ohio 45405 
\^~/'^ (513)233-2200 

THE LOTTO PROGRAM is designed (ot all 

6 & 7 drau' lotto games (up to 49 numbers)! 

DON'T PLAY LOTTO WITHOUT IT! 

APPLE & M/S DOS IBM 24.95 

COMMODORE & ATARI 21.95 

TRS-80 & MOD III. IV 21.95 

MACINTOSH (super version) 29.95 

PtuH add 12,00 •hipping/ I .— \ W^^g^ 
handling. Fa«< Htrvlcc on ■■ ■ r li ^mB^| 

charge carda. 1 — •' — 1 L_I J 

Raader Service No. 156 
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inverted, color may be stripped, the 
image may be flipped horizontally or 
vertically, and the bit map may be 
scrolled in single pixel increments. Bit 
map data which scrolls off the screen 
is lost and the color data does not scroll 
along with the bit map. The image may 
also be converted to the opposite bit 
map format even when the destination 
file format is the same as the original. 
The original image may be completely 
restored after any number of these al- 
terations, with the exception which we 
noted above. Interestingly enough, 
there was no way to load in a file, per- 
form some bit map manipulation, and 
resave the file in the same format as 
the original. Conversion to another for- 
mat is always required. 

Overall the Graphics Transformer is 
a very useful tool for anyone who 
works with C-64 graphics in several 
file formats. Many, if not all, of our 
criticisms will most likely be taken care 
of in the next update of the program. 
It seems that many of the proprietors 
of Complete Data Automation, Inc. are 
graduates from the select school of 
C-64 copy program programmers. 
Those of you who remember programs 
such as Di-Sector will recognize some 
of the names in the accompanying 
credits. In feet, more than a small 
amount of the C-64 hacker's wit has 
found its way into the program and its 
brief documentation. 

Complete Data Automation, P.O. 
Box 1052, Yreka, CA 96097 (phone: 
916-842-3431). -Morton Kevekon 

CELIBRiTY COOKBOOK VOLUME I 

Merrill Ward 
Commodore 64 
Disk; $29.99 

Here's a tasty recipe for any compu- 
terist with a hunger for high tech deli- 
cacies. Take one Commodore 64/128, 
add Celebrity Cookbook Volume I and 
voila! One hearty appetite will surely 
emerge! The program might not turn 
you into a master chef, but it does pro- 
vide alternatives to Wednesday's meat 
loaf and mashed potatoes. Best of all, 
it's designed for ease of use by non- 
computerists. Simple onscreen direc- 
tions, single-key commands, and full 
printouts of the recipes make Celeb- 
rity Cookbook a snap to use. 

The program features 50 or more 
recipes collected from such varied lu- 



minaries as Ronald Reagan, Princess 
Di, DoUy P&rton, and Bob Hope, Each 
recipe is presented in plain, matter-of- 
fact terms, with simple directions for 
its preparation. 

As the program loads, a quote by 
Andy Rooney offers the pithy wisdom 
that "The two biggest sellers in any 
bookstore are cookbooks and diet 
books. The cookbooks tell you how to 
prepare the food, and the diets tell you 
how not to eat any of it." 

The title page asks the user to choose 
from Volumes 1 through 6. If the cook 
is using one of the additional collec- 
tions in this series, this is the signal 
to insert the disk. 

After the cook chooses Volume 1, 
the onscreen menu lists the contents of 
the cookbook. There are eight choic- 
es: Appetizers & Beverages, Fish & 
Fowl Entrees, Meat Entrees, Desserts, 
Wine Directory. Bar Guide, Recipes by 
the Computer Chef, and Other Fea- 
tures. Choosing one of the four food 
categories prouces a listing from A to 
K of "star recipes." These explore the 
palates of the people who contributed 
to the cookbook, with such recipes as 
Ronald Reagan's Corned Beef Hash, 
Mitzi Gaynor's Hungarian Goulash, 
Jane Fonda's Curried Chicken, and 
Johnny Mathis' Wild Duck. 

The Wine Directory is especially 
nice for meal planners. First the user 
chooses from five food categories: 
fowl, seafood, red meat entrees, des- 
serts, and cheeses, nuts, and pasta. Af- 
ter the initial selection, the cook can 
fijrther define the parameters of the 
meal. Under seafood, for example, the 
menu lists A, clams, oysters and non- 
oily fish, grilled or poached; B, 
smoked salmon, fish with cream sauc- 
es, and fried fish; or C, rich prepar- 
ations or crab and lobster. Each of 
these selections produces a brief de- 
scription of the qiiality of wine that best 
compliments the food to be served, fol- 
lowed by a list of a half-dozen or more 
specific suggestions. 

The Bar Guide teaches the host or 
hostess the basics of mixology. There 
are recipes and instructions for a doz- 
en of the most popular drinks, plus in- 
formation on the amount of alcohol 
needed for parties from four to forty 
guests. 

Celebrity Cookbook, in addition to 
the recipes, contains Star Diets, in 



which 20 contributors like Mary Tyler 
Moore, Sophia Loren, and Boy George 
describe what they eat for breakfast, 
lunch, and dinner. Most have a weight 
loss theme, and there are some help- 
ful hints here for dieters. However, 
some are charming and ingenious. For 
example, Dolly Parton admits her 
breaidfest ", . .used to be spare ribs. Now 
it's juice and a soft-boiled or poached 

egg.'' 

Other features make the program 
even more useftil. Perle Mesta's Party 
Tips provides hints for more pleasur- 
able social gatherings, and includes a 
quiz on being a good guest. A slide 
show flashes a half-dozen fixxi-connec- 
ted cartoons onscreen in a meaningless 
but pretty display. Finally, Celebrity 
Cookbook contains an easy-to-use rec- 
ipe filer. The program even comes with 
a formatted blank disk, already titled 
'My Favorite Recipes,' for the compu- 
terisfs use. To make the program more 
attractive, special options change the 
text, background screen, or screen bor- 
der colors at will. 

Although the onscreen instructions 
are fine, it is a pity that Merrill Ward 
didn't include printed documentation as 
well. It would be helpful to have in- 
formation at hand, particularly when 
using the recipe filer. However, the pro- 
gram does permit the user to make 
printouts of the instructions, and the 
package includes a Quick Reference 
Card with a listing of command keys. 

Merrill Ward promises five addition- 
al volumes to follow, at $14.99 each. 
Four of these will feature menus for 
holidays (Easter, Fourth of July, 
Thanksgiving and Christmas), and the 
fifth will have prizewinners finom a con- 
test sponsored by the publisher. 

What Celebrity Cookbook Volume I 
lacks in fancy ornamentation is made 
up by ease of operation. It may not 
make you a better cook, but it should 
give you some new ideas about what 
to fix for supper tonight! 

Merrill Waixl, 255 N, El Cielo Road, 
Suite 222, Palm Springs, CA 92262 
(phone: 619-320-5828). 

—Joyce WoHey 

CGZ CLOCK/CALENDAR CARTRIDGE 
Joson-Ronheim 
Commodore 64 ond 128 
Price: $49.95 

Does your C-64 or C-128 ever want 
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to know the date and time? More ac- 
curately, are programs you run on your 
computer interested in the date and 
time? If so, the CCSZ Clock/Calendar 
Cartridge may be just what you need. 
Now, some of you may be aware that 
the TI and TI$ variables in Commo- 
dore BASIC will return the time or a 
reasonable fecsimile thereof. And you 
may jusdy question the need for an ad- 
ditional time gizmo to be added to the 
computer's expansion port. Rest as- 
sured that we will properly address all 
these concerns. 

BASIC does maintain a rudimentary 
timekeeping function. Locations 160- 
162 (SA0-$A2) are the zero page stor- 
age locations for the C-64's and the C- 
128's software jiffy clock. Note that in 
this case a jiffy is 1/60 of a second. 
This 24 hour clock is updated every 
1/60 of a second by the operating sys- 
tem at the occurrence of each system 
IRQ. The system IRQ is what normally 
performs BASIC'S housekeeping func- 
tions, which include the scanning of the 
keyboanj. The problem with this clock 
is that it is not very accurate. There are 
numerous operations which interrupt 
the regular functioning of the IRQ, such 
as disk and tape operations. 

Interestingly enough, the C-64 and 
the C-128 have two genuine, real time, 
time of day (TOD) hardware clocks 
built right in. These clocks are an in- 
tegral part of 6526 Complex Interface 
Adaptor (CIA) chips, of which there 
are two in every computer. These are 
12 hour clocks widi a precision of 1/10 
of a second. A single bit is provided 
to indicate AM or PM. The clocks are 
updated every 1/10 of a second by the 
60 Hz (50 Hz in Europe) power line 
frequency whose rate is accurately 
maintained by the power company. 
This is one of the uses for the nine volt 
AC supplied to the computer by its ex- 
ternal power supply. 

Strangely enough, the operating sys- 
tem makes absolutely no use of what 
seems to be a very valuable hardware 
resource. The reason for this is prob- 
ably a holdover from the PET and VIC 
20, and the BASIC 2.0 which is com- 
mon to all these computers. The I/O 
functions in these older machines were 
implemented with 6522 Versatile In- 
terface Adaptor (VIA) chips. The VIA 
chip does not have the internal TOD 
clock provided with the CIA. This does 



not explain why a real time clock func- 
tion was not added to BASIC 7,0 in the 
C-128, especially in view of the feet that 
the CIA's TOD clock is not affected by 
anything the computer does as long as 
it is turned on. 

The CCSZ Clock/Calendar cartridge 
seeks to rectify this oversight and pro- 
ceeds to do so with a vengeance. Ja- 
son-Ranheim has managed to cram an 
impressive array of hardware into a 
standard size (2Vi'" by 3") expansion 
port cartridge. To start with, there is 
an OKI Semiconductor MSM6242RS 
crystal controlled clock chip. To keep 
this clock running after the computer 
is turned off there is also a 3.6 volt, 
70 milliampere hour, rechargeable nic- 
kel-cadmium battery. This battery, 
when fully charged by approximately 
24 hours of computer operation, is cap- 
able of maintaining the contents of the 
CCSZ for up to 18 months. 

The program which tells the CCSZ 
what to do is stored in an onboard 8K 
PROM. In addition the CCSZ contains 
8K of static RAM of which one page 
(256 bytes) is reserved by the CCSZ. 
The remaining 7936 bytes is available 
to the user. The contents of this RAM 
is also preserved by the CCSZ's built- 
in battery. Finally there is an empty 28 
pin DIP socket which can accommo- 
date a user-programmed PROM with 
up to 64K of program space. The em- 
phasis on PROMs in the CCSZ is not 
at all surprising in view of Jason- Ran- 
heim's flagship product, the Promen- 
ade, a very versatile PROM program- 
mer for the C-64 priced at less than 
$100. 

This impressive collection of chips 
would not be of much use without 
proper operating system support. This 
support is exactly the function of the 
CCSZ's built-in PROM. Incidentally, 
all die CCSZ's chips, except the clock 
chip, are socketed for easy replace- 
ment. The first time you turn on the 
computer widi a CCSZ installed you 
should do so with the CONTROL key 
depressed. This will cause the display 
of the CCSZ's setting menu. 

The first menu item is the Set Date 
and Time Function, which drops you 
into a second menu to do just that. 
Once set, the information is stored in 
the CCSZ's own RAM. The second 
menu item tells the CCSZ just what to 
do with its time information every time 
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it powers up. You can instruct the 
CCSZ to install the time into the TOD 
clock of one of the computer's CIA 
chips. Or you can tell the CCSZ not 
to update the CIA's TOD clock at all. 

The next menu item tells the CCSZ 
the power line frequency. For North 
America this will be 60 Hz and for Eu- 
rope it will be 50 Hz. The frequency 
setting in the computer is a hardware 
function which is not available to the 
CCSZ on the expansion port. 

Next you are offered the option of 
automatically displaying the date and 
time information in the upper right 
hand comer of the screen. This infor- 
mation will be updated by the CCSZ's 
own IRQ which occurs once per sec- 
ond. Thus, even if you clear the screen, 
the date and time information will re- 
appear. You have the option of display- 
ing only the time, the date and the time, 
or nothing at all. Note that the date and 
time display data will be read by the 
computer when you hit the RETURN 
key on that line. This will interfere with 
user input on the first screen line. 

The next option allows the CCSZ to 
date and time stamp disk files. This 
does not use any normally accessed 
space on the disk, as four unused bytes 
in the disk directory have been chosen 
for this purpose. The disk file data and 
time information may be displayed by 
using the CCSZ's directory display 
command, the asterisk (*). This com- 
mand supports all four disk drive de- 
vice numbers (8, 9, 10, or 11) and may 
be accessed within the C-128's MLM. 

The next two ftinctions let the CCSZ 
automatically load and run a user- 
stored program from either its own 8K 
RAM or from the disk. The CCSZ 
RAM is treated as device 12. You can 
store only one program in it. You can 
also store BASIC'S variable, array, and 
string data in the CCSZ's RAM. Re- 
calling BASIC'S data fiiom CCSZ RAM 
can be a very fast way of initializing 
a program. 

If you elect to load a program from 
disk, four more options are available. 
These let you choose between a C-64 
program or a C-128 program and be- 
tween a relocatable BASIC program 
LOAD or a non-relocatable LOAD. 
You will also indicate the program's 
name. 

All the information entered during 
the setup process is stored in the 
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CCSZ's battery-backed RAM and will 
be implemented each time the compu- 
ter is turned on or reset. 

In addition to all the setup options, 
the CCSZ may be directly controlled 
via a set of 24 additional functions. 
These are all accessed by first POKE- 
ing a value (0-31) into 165 and then ex- 
ecuting a SYS 999. The code which 
controls the function access consists of 

27 bytes starting at 996 (S03E4) in both 
the C-64 and the C-128. We do not have 
the space to go into each of these rou- 
tines in detail, but we have listed them 
all here: 

Table of CCSZ Functions 

No. Function 

Set default computer to C-64 or C-t28 

1 Read date and time from CCSZ and store 
in 166-173 

2 Slor« BASIC variables in CCSZ RAM 

3 Recall BASIC variables frt)ni CCSZ RAM 

4 Store BASIC array data in CCSZ RAM 

5 Recal I BASIC array data from CCSZ RAM 

6 Store BASIC string data in CCSZ RAM 

7 Recall BASIC siring data fmni CCSZ RAM 

8 Store CCSZ bytes free in 166-167 

9 Set RAM protect pointer in CCSZ RAM 

10 Read power-off log from CCSZ 

11 Read power-on log from CCSZ 

12 Set BASICS TIS to current time 

13 Read a negister from the CCSZ's 6242 clock 
chip 

14 Store data in 6242 register 

15 Not defined 

16 Store single byte to CCSZ RAM from 166 

17 Read a byte from CCSZ RAM into 166 

18 Stoit a block to CCSZ RAM 

19 Read a block from CCSZ RAM 
20-23 Not defined 

24 Number of times CCSZ has been powered 

up or reset 
25-27 Not defined 

28 [iiitialize (formal) CCSZ RAM 

29 Completely disable CCSZ 

30 Partial disable of CCSZ 

31 Reenable CCSZ after function 30 

When the CCSZ is installed, the 
auto-boot feature of the C-128 is effec- 
tively disabled. That is, the auto-boot 
liinction involving sector of track 1 
on the disk, which is automatically exe- 
cuted as part of the C-128's power up 
sequence, will not work. BASIC 7.0's 
BC)Or command, which does the same 
thing, does not work either. The CCSZ 
fijnction number 29 will disable the 
CCSZ and allow the BOOT command 
to operate. It is possible to restore the 
auto-boot function without removing 
the CCSZ from the cartridge port by 
including the execution of function 29 
in a short program saved to those disks 
you wish to auto-boot. This could be 



made part of the program which is au- 
tomatically executed by the CCSZ on 
power up. Based on the available CCSZ 
startup scenarios, there are many other 
ways to accomplish this task. 

Functions 10, 11. and 24 are intend- 
ed for when the computer is used for 
the control of unattended processes. 
These functions provide the application 
the ability to determine things such as 
the date and time of a power interrup- 
tion, its restoration, and the number of 
operations which have occurred. When 
combined with the CCSZ's various au- 
tobooting capabilities, it is possible to 
design a computerized application 
which can continue to function dirough 
disturbances. 

Functions 13 and 14 deal directly 
with the registers in the 6242 clock 
chip. A table of these 16 registers is in- 
cluded with the CCSZ manual. 

The use of the CCSZ with currently 
available commercial applications will 
be spotty. Even applications which 
make use of the CIA's built-in TOD 
clock are apt to reset its contents when 
starting up. For example. CP/M uses 
the TOD clock in CIA ff\ for its date 
function. We found that CP/M would 
preserve the minutes and seconds val- 
ues it found there, but the hour value 
gets clobbered. In feet, CP/M even 
clobbered the hour value in the CCSZ. 
Note that the CIA chip does not store 
any date information. This data is pure- 
ly a dinction of the CCSZ. 

It may be possible to modify some 
applications to work with CCSZ. Tele- 
communications programs are a specif- 
ic example which stand to benefit from 
the CCSZ's time and date data, Jason- 
Ranheim has succeeded in modifying 
Bob's Term Pro 128. Sixth Sense 128, 
and Sixth Sense 64 to work with the 
CCSZ. The procedure for doing this 
is available from Jason- Ranheim upon 
request. 

The CCSZ is not intended for every- 
one. Its application will tend to be 
somewhat specialized and it is obvious- 
ly geared to users with programming 
experience. Those users who have a 
need for the CCSZ's specific capabili- 
ties will find it to be a very capable 
and extremely well thought out pnxluct. 

Jason-Ranheim, 1805 Industrial 
Drive, Auburn, CA 95603 (phone: 800- 
421-7731; in CA 800-421-7748). 

—Morton Kevelson 
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THE DEATH OF GOTO 




By Richard Herring 



ver the last two months we've talked about 
control structures -commands that break nor- 
mal line-by-line program execution and trans- 
fer the path of execution to some other point 
in the program. We covered all the control structures in 
COMAL (and in most other languages) except for two. 
The best and the worst were saved for last. The best? 
Procedures (PROC/ENDPROC). The worst? GOTO, Most 
of us started in BASIC. That means we were introduced 
to the worst, most misused control structure and deprived 
of the best. 

In a classic letter to the editor, Edsger Dijkstra (a verit- 
able philosopher of programming) observed that the ease 
of understanding program listings is inversely proportion- 
al to the number of unconditional transfers of control 
(GOTOs) in those listings. The editor titled the letter "Go 
to Statement Considered Harmful." 

What Dijkstra was selling was not just the demise of 
GOTO, but the advent of structured programming. That's 
a methodological style of building computer programs by 
logically linking subprograms that are either themselves 
structured programs or are in the form of control structures. 
Back in March we developed a graphics demo where the 
main program was composed entirely of procedure calls 
and was only three lines long: 

10 questions 
20 setup 
30 drawit 

Alternatively, we could have used GOTOs: 

10 GOTO <label at line 40> 
20 GOTO <label at line 210> 
30 GOTO <label at line 330> 

Then, at the end of each of our old procedures, we could 
have jumped back to the main program, or to another pro- 
cedure, or to somewhere seemingly unrelated in the pro- 
gram. Unlike the control structures we studied in the last 
two issues, the pattern used by GOTO is neither systematic 
nor obvious. 

GOTO says to the reader of the piTogram, "Stop here. You'll 
find the continuation of this logic at some other point. Then 
you may come back here or you may not," The problem 
with GOTOs is that they fool the programmer into believing 
that he has control. Programs that use lots of GOTDs can 
continue for pages and pages, borrowing routines from 
themselves, without ever breaking into subprograms that 
will still be comprehensible to the programmer a few months 
down the road. 

Structured programming, as an alternative, is designed 
to be easy to read, easy to understand, easy to update, and 
easy to debug. During the actual coding of the program, 



structured programming will actually prevent errors. 

The popularity of structured programming is apparent 
throughout computerdom. Witness the popularity of the 
structured language Pascal in universities, the U.S. govern- 
ment's choice of a structured format for its chosen language 
Ada, and the acceptance of FORTRAN 77 {a version that 
finally allows some structure) in the scientific community. 

Now BASIC doesn't prevent structured programming, but 
the design of the language does not encourage it either. 
COMAL'S design does. Especially by fostering the use of 
procedures. 

Procedures are nothing more than stand-alone program 
modules. Ideally they are never over a page long (unless 
they are broken into recognizable subunits themselves). A 
COMAL procedure can be called from the main program 
by just listing its name on a line by itself. To make reading 
easier, COMAL will automatically indent the body of the 
procedure. 

When you call a procedure, the program will jump to 
the procedure, execute it, then jump back to the main pro- 
gram and continue with the line right after the procedure 
call. Procedures will not be run unless your program calls 
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them, even though they are right there in the hsting. 

In COMAL 2.0 procedures become especially attractive 
Isecause they can be EXTERNAL to the program. You can 
save them separately on disk and call them from your pro- 
gram whenever you like. Given the speed of our feithfiil 
Commodore disk drives, you won't do this a lot. But in 
large programs, the ability to have a subroutine (in the guise 
of an EXTERNAL procedure) that only uses memory while 
it's in use, then gives that memory back to the main pro- 
gram, is pretty attractive. 

Program rariables are generally considered global — 
available to both the main program and the procedure. What 
if the internal operation of your procedure interferes with 
the main program, say by changing a value you don't want 
changed? No problem. Just declare the procedure CLOSED 
and every variable will be local— known only to the proce- 
dure, even if it has the same name as a variable in the main 
program. 

Once a procedure is CLOSED, you can pass the value 
of a variable into the procedure by listing that variable in 
the procedure heading. Or you can IMPORT the variable 
into the procedure (in 2.0 only). When a variable is passed 
into a procedure, the main program still uses its original 
value. When that variable is IMPORTed, however, the main 
program will recognize any changes made by the procedure. 

COMAL procedures, like procedures in all languages that 
support them, are like black boxes. They have certain in- 
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puts, which we can control, and certain outputs, which we 
can specify. From the program's perspective, how a proce- 
dure (black box) does its work is not really important. 

The beauty of suuctured programs, as E. D. Reilly wrote. 
is that they are worthy of being read by humans, not just 
by machines. And they allow programming to be approached 
more as a science than as an art. 

Whether you're a scientist or an artist, drop me a line 
with your COMAL comments at P.O. Box 1544, Tallahas- 
see, FL 32302. D . 

Tech Notest 

1) Dijkstras letter to the editor was published in 1968 
in "Communications of the Association for Computing 
Machines," Comm. ACM 11, No. 3. 

2) E. D. Reilly's comments on structured programming 
can be found in the Encyclopedia of Computer Science 
and Engineering. 

3) When you include a list of parameters with a proce- 
dure, they are passed to the procedure by their position 
in the parameter list, not by name. That's why names 
don't have to match. But the calling statement and the 
procedure heading must have exactly the same number 
of parameters. And the parameters must be in the same 
order. 

4) If you can avoid using global variables in proce- 
dures, do. They can produce unwanted side effects that 
ripple through your program whenever a change is made. 
Also, if you avoid global variables, you will have proce- 
dures that can be individually saved to disk and used 
in other programs. The best programmers have libraries 
of routines like this. 

5) After a program is RUN (or SCANned in version 
2.0). the computer knows all the procedures. You can 
run any of the procedures in direct mode by typing EXEC 
< procedure name > . This even holds true for external 
procedures. 

6) You may not give a variable and a procedure the 
exact same name in COMAL. 

7) A procedure placed within another procedure 
(nested) will be local to the parent procedure, not glo- 
bal to the main program. Nested procedures are only 
allowed in version 2.0. Procedures are generally not al- 
lowed inside control structures. 

8) When a procedure is CLOSED, it is not only pre- 
vented from changing any variables in the main program, 
but also from using any procedures, labels, or variables 
from the main program. CLOSED means isolated. In 
version 0.14, procedures and functions are always glo- 
bal, even after a CLOSED command. 

9) In principle. GOTO is sufficient for all conceiv- 
able intraprogram sequence control. In fact, it has been 
proved that any flowchart or program can be rewritten, 
in an equivalent way. using subunits of only three kinds— 
command sequences, decision clauses (IF/THEN), and 
repetition (like REPEAT/WHILE). Bohm and Jacopini, 
"Flow Diagrams, Turing Machines, and Languages With 
Only Tto Formation Rules," Comm. ACM 9, No. 5, 1964. 
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By Dale Rupert 




ach month, we'll present several challenges de- 
signed to stimulate your synapses and toggle the 
bits in your cerebral random access memory. We 
invite you to send your solutions to: 

Commodores, c/o Ahoy! 

P.O. Box 723 

Bethel, CI 06801 

We will print and discuss the cleverest, simplest, short- 
est, most interesting and/or most unusual solutions. Be sure 
to identify the name and number of the problems you are 
solving. Put your name and address on the listings as well. 
Show sample runs if possible. Briefly describe your solutions 
and tell what makes them unique or interesting, if they are. 
You must enclose a stamped, self-addressed envelope if you 
want any of your materials returned. Solutions received by 
the middle of the month shown on the magazine cover are 
most likely to be discussed, but you may send solutions 
and comments any time. Your original programming prob- 
lems, suggestions, and ideas are equally welcome. The best 
ones will become Commodares! 



PROBiEM #44-lt AODMO DIFFICULTY 

This problem was submitted by James Bickers (Shep- 
herdsville, KY), and he s^s it is HARD. The user enters 
a positive integer and the computer prints out all possible 
addition problems (of positive integers) which equal that 
number. For example, an input of 4 yields I+l+l+l, 1+1+2, 
1+3, and 2+2. Jim says no repeats are allowed and num- 
bers must be ordered consecutively. Who can refijse a chal- 
lenge like that? 

PROBLEM #44.2{ FRANK'S CHILDREN 

Here's another interesting one from Necah Buyukdura 
(Ankara, Tbrkey). Frank has five children: 

1. Andy is older than Bill by half of Carl's age. 

2. Bill is older than Emma by half of Andy's age. 

3. Car! is older than Emma by two years plus twice Em- 
ma's age. 

4. Dave is one year older than Emma. 

5. Ennma's age is one-fourth the sum of Carl's and Dave's 
ages. 

Write a program to calculate and print the ages of Frank's 
children. 



PROBLEM #44.3: INHOt STRING 

Write an unordered INSTR (instring) program. The user 
enters two strings. The program tells whether or not all the 
letters of the first string are contained within the second 
string regardless of order Any duplicate letters in the first 
string must also be duplicates in the second. 

For example, if the user enters DOOR, COMMODARES 



the computer responds "Yes." If the user enters ROAR, 
COMMODARES the computer responds "No," since the 
first string contains two R's and the second has only one. 

PROBLEiN #44-4; KEY FUNCTIONS 

What is your best, shortest, longest, most interesting, most 
unusual, most useful, or most exciting function key defini- 
tion? One of mine for the C-128 is a "list to sequential file 
or printer output" key. It is defined this way: 

CHR$(27) + "IDN=8+4*(DN<>8):0PENDN,DN,DN 

,(F$):CMDDN: 

LIST:PRINT#DN:CLOSEDN" + CHR$(13) 

To send a listing to the printer, simply press the funcfion 
key. DN is initially 0, so it becomes 4. Logical file 4 to 
device 4 (the printer) is opened, and the listing is sent to 
it with the CMD command. 

To convert a program to a sequential disk file, first enter 
DN=8 : F$="filename,S,W" in direct mode, then press the 
function key. Now DN remains 8 and device number 8 (the 
disk drive) is opened. The program currently in memory 
is then listed to the disk file whose name is given by F$. 
No doubt this function key definition is trivial compared 
to some of those you can come up with. 

This month we have a group of unique and interesting 
solutions to Commodares from the April 1987 issue of Ahoy! 
Problem 040-1: Small Straight was submitted by Steven 
Steckler (Columbia, MD). The idea is to simulate the toss 
of five dice as in the game Yahtzee, and to identify any toss- 
es which contained one or more small straights. A small 
straight is a sequence of numbers 1234, 2345, or 3456 ar- 
ranged in any order on the dice. 

Most solutions used sorting techniques to arrange the ran- 
domly chosen dice values in numerical order Then it is 
a straightforward process to look for one or more of the 
possible small straights. 

Since we will discuss sorting techniques for the next prob- 
lem, let's look at solutions which did not explicitly sort the 
dice first. 

Harry Stoddart (Bradford, ON) used the signum (SON) 
function in a relevant manner 
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•2 
•3 
•4 
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•6 



REM 
REM 
REM 
REM 
REM 
REM 



COMMODARES PROBLEM #40-1 

SMALL STRAIGHT 
SOLUTION BY 

HARRY STODDART 



■10 PRINT"THE #'S:":FOR X=l TO 5:R=INT(RN 
D(TI)*5+.5)+l:A(R)=A(R)+l:PRINT R; :NEXT 
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■20 FOR Y=l TO 3:F0R X=Y TO Y+3:S(Y)=S(Y) 
+SGN(A(X)):NEXT X:NEXT Y:PRINT 

•30 PRINT"THE SMALL STRAIGHTS ARE"1234*-( 
S(1)=4);2345*-(S(2)=4);3456*-(S(3)=4) 

•40 RUN 

Line 10 generates five random numbers from 1 to 6 to rep- 
resent the values of the dice, A(R) stores the count of dice 
having the value R. If there are two 5's and no Ts, then 
A(5) equals 2 and A(l) equals 0. 

Line 20 iooks for 1234, 2345, and 3456 when Y has val- 
ues 1, 2, and 3 respectively. When Y is 1, X is given val- 
ues 1, 2, 3, and 4. S(Y) is incremented by SGN(A(X) ) for 
each X. If A(l) is 0, meaning that no die has a value of 
1, then SGN(A{1) ) is 0. If one or more dice have a value 
of 1, then A(l) is greater than zero, and SGN(A(I) ) is 1. 

Consequently to have the small straight 1234, S(l) will 
be exactly 4, since there will be one or more of the values 
1, 2, 3. and 4. The SGN function adds only one to the sum 
S(Y) even if more than one die has the value Y. 

Line 30 prints for any of the three possible small 
straights for which S(Y) is not 4. It prints the values of each 
small straight for which S(Y) is 4. If the logical statement 
S(l)=4 is true, then it has the logical value -I; otherwise 
it has the value 0. Consequently 1234 * -(S(l)=4) equals 
1234 when S(l) is 4, and it equals otherwise. 

A different approach is shown in this COMAL program 
by Mark Breault (Brandon, MAN^ 
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0002 // COMMODARES PROBLEM #40-1 : 
f//j3 // SMALL STRAIGHT 
OOOA // SOLUTION BY 

0005 // Mark Breault 

0006 //======= COMAL 0.14 ============= 

0010 dim d$ of 6 

0020 d$: ="000000" 

0030 for i:=l to 5 do 

0040 r:=rnd(l,6) 

f/j5Q d$(r):="l" 

0060 print r, 

0070 endfor i 

r/j80 if "nil" in d$ then print " Small 

Sraight" 

Mark uses the character positions within the string variable 
DS to store the results of the dice. DS is initialized to 
"000000". For every value displayed on the dice, the corre- 
sponding in DS is changed to a 1. If the roll of the dice 
gives values 1, 1, 2, 2, and 5, then DS would have the val- 
ue "110010" where characters in positions 1, 2, and 5 are Is. 

All that is necessary to find a small straight is to look 
for four consecutive Fs within D$. That is the purpose of 
line 80. This program inherently sorts the values of the dice 
and makes it easy to pick out the small straight. 

BASIC 7.0 allows the MID$ statement on the left side 
of the equal sign. To set the Rth character within D$ to 
T, line 50 of Mark's program would be 

50 MID$(D$,R)="1" 

and the equivalent statement for line 80 is 

80 IF INSTR(D$,"1111") <> THEN PRINT " 
SMALL STRAIGHT" 

INSTR (called "in-string") gives a number corresponding 
to the first occurrence of "IIU" within DS. If DS does not 
contain the substring "1111", then the INSTR function has 
the value 0. 

Other variations on this theme of inherent sorting included 
binary and prime number representations of the dice values. 
Stephane Edwardson (La TXique, QUE) assigned prime 
numbers 2,3,5,7,11, and 13 to dice values 1 through 6 re- 
spectively. If the dice values of a toss were 1, 4, 5, 2, and 
3, the prime product of the toss would be 2 * 7 * 11 * 3 
* 5 or 2310. The prime products of the small straights 1234, 
2345, and 3456 are 210, 1155, and 5005 respectively. 

If the roll of the dice contains any of the small straights, 
then its prime product will be evenly divisible by the prime 
product of that small straight. In the example above, 2310 
is evenly divisible by 210 and by 1155 but not by 5005. There- 
fore that loss of the dice must contain the small straights 
1234 and 2345 but not 3456, Ah, the pleasures of mathe- 
matics! Merci, Stephane. 

Problem MO-2: Short Sort was suggested by Chris Rai- 
mondi (Kingsville, MD). The problem was to see if anyone 
could come up with a one-line sorting routine which would 
arrange six input values in numerical order. 



72 AHOY! 



The two major hurdles in fitting the routines into one 
line were I) the 80-column line length limit for the C-64, 
and 2) the pesky IF-THEN statement without an ELSE on 
the C-64 (nothing on a line after the IF clause is executed 
if the clause is not true). Clever coding and abbreviations 
solved the first problem. Many readers ingeniously used 
logical variables to solve the second. 

The following program is a compendium of a few of the 
multitude of one-line sorts. 

•2 REM COMMODARES PROBLEM #40-2 : 
•3 REM SHORT SORT 

•10 FOR 1=1 TO 6 : A(I)=INT(RND(0)*IOOO)- 
500:PRINT A(I) ; :QQ(I)=A(I) :NEXT I:PRINT 

•20 FOR JJ=1 TO 5 : ON JJ GOSUB 110,210,3 
10,410,510 

■30 FOR 1=1 TO 6 : A(I)=QQ(I) : NEXT I : 
PRINT : NEXT JJ 

•99 END 

•100 REM * SOLUTION BY JIM SPEERS ******* 

•110 FORI=1T06:K=1:FORJ=1T06:K=K-(A(J)>A( 
K))*(J-K):NEXT:PRINTA(K);:A(K)=-9E9:NEXT 
•120 RETURN 
•200 REM * SOLUTION BY STEPHANE EDWARDSON 

•210 F0RY=1T05:F0RZ=YT06:A=A(Y):B=A(Z):A( 
Y)=-A*(A<=B)-B*(B<A):A(Z)=A+B-A(Y):NEXTZ 
,Y:F0RN=1T06:PRINTA(N);:NEXT 

•220 RETURN 

•300 REM * SOLUTION BY RON GOW ********* 

**********«*********s>:*^<j(:*3!c>(:5}:*sic*:^*s(:3j:;5<jjt:|:*:j: 

•310 F0EX=1T06:B=0:F0RY=1T06:B=B-(A(Y)<=A 
(X)):NEXT:C(B)=A(X):NEXT:F0RN=1T06:PRINT 
C(N);:NEXT 

•320 RETURN 

•400 REM * SOLUTION BY D.BRUCE POWELL ** 

•410 F0RI=1T05:F0RJ=I+IT06:T=A(J):D=T-A(I 
):K=D<0:A(J)=T+K*D:A(I)=T-(1+K)*D:NEXTJ: 
PRINTA(I) ; :NEXTI:PRINTA(I) ; 

•420 RETURN 

•500 REM * SOLUTION BY JEFF ACHTNIG *** 
**!j{****j[c*5}:*** c_]^28 ONLY *************** 

• 510 F0RY=1T06 : F=999999999 : ACZ)=F: F0RX=1T 
06:IFF>A(X)THENF=A(X):Z=X:NEXTX:PRINTF;: 
NEXTY : ELSENEXTX : PRINTF ; : NEXTY 

•520 RETURN 

Line 10 randomly selects six integer between -500 and 
500. They are stored in A( ) and also in QQ( ). Line 20 
calls each of the sort-and-print subroutines in turn. Line 
30 restores the original values of A() before the next rou- 
tine is called. Line 110 from Jim Speers (Niles, MI) replaces 
each element of A( ) with a very small value after that val- 
ue is sorted. Jim's program sorts the elements in descend- 
ing order. 



The other programs sort in a ascending order. C-64 users 
may have to use two lines for some of these routines, al- 
though that is because of PRINT statements. The sorting 
portion of each of these programs fits into one 80-charac- 
ter line. These programs are representative of the wide va- 
riety of solutions, although there were dozens of variations 
on these themes. 

Thanks to Stephane Edwardson (La Tuque, QUE). Ron 
Gow (Sacramento, CA), D, Bruce Powell (Franklin, VA), 
and Jeff Achtnig, as well as all others who sent short sort- 
ing solutions. 

An interesting approach for quickly sorting long lists of 
integers was described by Walter Deuchler. Jr. (Aurora, IL). 
Rather than store the integers in an array, you can store a 
count of the number of occurrences of each integer in the 
array. The index of the array is the integer value. 

Say that you have a set of three integers ranging from 
to 99. If the numbers are 5, 23, and 23, then A(5)=l, 
A(23)=2, and all other elements of A( ) from A(0) to A(99} 
are zero. To print die set in sorted order, simply step through 
each element of A( ) and print the index of each element 
the appropriate number of times. Look at Walter's program 
to see how it's done. 



•1 REM == 

•2 REM 

•3 REM 

•4 REM 
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•5 REM WALTER DEUCHLER JR. 

•10 MX=99 : DIM A(MX) :REM MAX. INTEGER 

•20 NM=10 :REM # TERMS 

•30 FOR J=l TO MM : X = INT(RND(0)*100) : 

A(X)=A(X)+1 : NEXT 
•40 FOR J=0 TO MX : T=A(J) :IF T THEN FOR 

K=I TO T : PRINT J; : NEXT K 
•50 NEXT J 

The price you pay for the speed of this sorting routine 
is the amount of memory used. The array A( ) must have 
as many elements as the largest allowable integer. Line 10 
sets the maximum integer to be 99 and dimensions A( ). 
Line 20 sets NM to the number of items to be sorted. Line 
30 picks NM random integers from to 99. If a 5 is picked, 
for example, then one is added to A(5). As the numbers 
are picked, they are automatically sorted. 

Line 40 prints the selected integers in sorted order. It looks 
at all elements of A(J) from A(0) to A(99). If one 0, no 
I's, and three 2's had been picked, then A(0)=I, A(1)=0, 
and A(2)=3. Consequently the K loop in line 40 prints 0, 
2, 2, 2. The statement "IF T THEN" tests the value of T. 
If T is zero, the rest of line 40 is skipped. If T is non-zero, 
the K loop prints the value of J, T times. 

Walter mentioned that he has sorted an array of 100 in- 
tegers in 304 jiffies using this "indexing" sort, whereas the 
Quicksort required 1884 and the Shell sort required 3128 
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jiffies. Those last two are well-known sorting algorithms. 
If your data fits the constraints of this "indexing" sort, you 
can't beat it for speed and ease of implementation. By the 
way, Robert Sedgewick in his very useful book Algorithms 
(Addison-Wesley, 1984) calls this type of sort a "distribu- 
tion counting." 

Ivan Rudyk sent the following implementation of the 
Quicksort. 

•1 REM ================================== 

•2 REM DEMONSTRATION OF QUICKSORT BY 
•3 REM IVAN RUDYK 

•10 Q=180 : DIM N(Q),M(Q) 

•20 PRINT" [CLEAR] GENERATING NUMBERS [3"."] 

":F0R X=l TO Q:N(X)=INT(1000*RND(0))+1:N 

EXT X 
•30 PRINT"S0RTING[3"."]'* : TO=TI 
•40 M(1)=I : M(2)=Q : A=2 
•50 B=M(A) : A=A-I : C=M(A) : A=A-1 : E=C 
•60 F=B : D=N((C+B)/2) 
•70 IF N(E)<D THEN E=E+1 : GOTO 70 
•80 IF N(F)>D THEN F=F-1 : GOTO 80 
•90 IF E<==F THEN Z=N(E) : N(E)=N(F) : N(F 

)=Z : E=E+1 : F=F-1 
•100 IF E<=F THEN 70 
•110 IF C<F THEN A=A+1 : M(A)=C : A=A+1 : 

M(A)=F 
•120 C=E : IF C<B THEN 60 
•130 IF AOO THEN 50 

• 140 FOR X=l TO Q : PRINT N(X) ; : NEXT X 

• 145 PRINT TI-TO"JIFFIES" ; END 

•200 REM ================================ 

•210 REM CONVENTIONAL BUBBLE SORT 
•220 REM (ADD LINE 35 GOTO 240) 
•230 REM ================================ 

•240 FOR J=l TO Q-1 :FOR K=J+1 TO Q : IF 
N(J)>N(K) THEN T=N(J) :N(J)=N(K) :N(K)=T 

•250 NEXT K,J : FOR X=l TO Q : PRINT N(X) 
; : NEXT X : PRINT TI-TO"JIFFIES" : END 

It generates and sorts 180 random integers from 1 to 1000, 
It keeps track of the number of jiffies (sixtieths of a sec- 
ond) and displays the results. 

You may add line 35 GOTO 240 to this program to use 
the more traditional form of the bubble sort at the end of 
Ivan's program. Change the value of Q in line 10 for differ- 
ent numbers of items to be sorted. You will soon realize 
that the complexity of the Quicksort program is readily off- 
set by its speed, at least when the number of items to be 
sorted is large. 

The Quicksort took 1484 jiffies (under 25 seconds) to 
sort 180 integers on the C-128 in FAST mode. The bubble 
sort took much longer Run the timing tests yourself. 

Problem #40-3: Polygon Play suggested by Nolan Whit- 
aker (Jeffersonville, KY) brought out the geometry experts. 
Given the number of sides of a regular convex pwlygon, 
the computer gives a) the size of each interior angle, b) 
the sum of its interior angles, c) the area of the polygon, 
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d) the radius of an inscribed circle, and e) the radius of 
a circumscribed circle, assuming each side of the polygon 
is one meter in length. Whew! 

"Regular" means "all sides equal," and "convex" means 
"no interior angles greater than 180 degrees." A square is 
a regular convex polygon of four sides. This program from 
Joe Steininger (Bethlehem, PA) lets the user specify the 
number of sides and the length of each side. 



REM 



REM COMMODARES PROBLEM #40-3 : 

REM POLYGON PLAY 

REM SOLUTION BY 

REM JOE STEININGER 

10 PRINT" [CLEAR] HOW MANY SIDES" 

20 INPUT N:IF N<3 GOTO 20 

30 PRINT"LENGTH OF EACH SIDE, IN METERS" 

40 INPUT L 

50 A=((N-2)/N)*180 

60 S=A*N 

70 R=(L/2)*(1/TAN([PI]/N)) 

80 D=(L/2)*(1/SIN([PI]/N)) 

90 Y=N*(L[UPARR0W]2)/4*(1/TAN([PI]/N)) 

100 PRINT"INTERIOR ANGLES ARE ";A;"DEGRE 

ES EACH": PRINT 

110 PRINT"SUM OF INTERIOR ANGLES IS ";S; 

"DEGREES" : PRINT 

120 PRINT"THE AREA IS ";Y;"SQUARE METERS 

": PRINT 

130 PRINT"INSCRIBED RADIUS IS ";R; "METER 

S": PRINT 

140 PRINT"CIRCUMSCRIBED RADIUS IS ";D;"M 

ETERS": PRINT: PRINT 



The formulas for the various parameters are in lines 50-90. 
Keep in mind that BASIC assumes angles are measured in 
radians, not degrees (pi radians = 180 degrees). 

Several readers used a different formula for polygon area. 
If R is the radius of the inscribed circle, the area of the 
polygon is simply N*R/2 where N is the number of sides. 

Richard van Frank (Montclair, NJ) sent a very nice analy- 
sis of this problem. He was interested in the largest num- 
ber of sides the C-64 could handle. It turned out to be a 
4,294,967,295-sided polygon. Do you think you could dis- 
tinguish between such a figure and a circle? 

The inscribed and circumscribed radii are the same for 
this polygon (within the resolution of the computer). You 
might try putting this problem into a loop and watching 
the inscribed and circumscribed approach each other as the 
number of sides increases. You might also add formulas 
to calculate the areas of the inner and outer circles and com- 
pare them to the area of the polygon. 

On the lighter side, Jim Speers sent along this bit of poly- 
gon trivia. He found when working with this problem that 
a regular polygon with 5.33864716 sides has an area of ex- 



actly 2 square meters. Would anyone care to build one and 
measure it? 

The final Problem lt40-4: Integer Functions was to give 
user-defined functions FNF(X) and FNC(X) which calcu- 
late the floor and ceiling function of any input value X. 
The floor function of X is the greatest integer less than or 
equal to X. The ceiling function is the least integer greater 
than or equal to X. 

Half of this problem was nearly trivial, and the other 
half was somewhat tricky. Most readers defined FNF(X) 
this way; 

DEF FNF(X) = INTCX) 

In fact the INT function is equivalent to the floor function. 
The trickier part was the ceiling function. 

The most common solution was DEF FNC(X) = INT(X) 
-f-1 but unfortunately this is not totally correct. It is valid 
for all values of X except when X is an integer. In that case, 
the floor function is equivalent to the ceiling function. Jim 
Speers used this definition for the ceiling function: 

DEF FNC(X) = FNF(X) + 1 + (X=INT(X)) 

The last part of the expression subtracts the added one when- 
ever X is an integer. Stephane Edwardson took a different 
approach. His definition of the ceiling function is 

DEF FNC(X) = -INT(-X) 

Convince yourselves that these two definitions give identi- 
cal results. Congratulations to Thomson Fung (San Diego, 
CA) for recognizing this subtlety of the ceiling function. 

There should be enough work here to keep you busy and 
happy until next month. Keep those solutions and sugges- 
tions coming. 

This is a list of people with valid solutions who were 
not already mentioned this month. 



Kirk Adams 

Sean Bales (N. Stoninglon, CT) 
Gregg Bell (Broomfield. CO) 
James Bickers 

(Shepherdsville. KY) 
Thomas Braun (Omaha. NE) 
Leo Brcnneman (Erie, PA) 
Vaughn Brigham (Cadillac, MI) 
David Brou.se (Shippensburg. PA) 
Carlos Centeno (Lares. PR) 
Henry Christensen (Salem. OR) 
Dan Darlington 

(Minneapolis. MN) 
Curt Donofrio 

Peggy Eckbold (Somers Pt,, NJ) 
Veli-MaUi Eerola 

(Kerava, Finland) 
Bill Garrett (Longview. WA) 
Alan Gulicrrez 
Jim Henderson (APO NY) 
David Hoffner (Brooklyn. NY) 
Gary Jones (Williamsport, IN) 
Ron Jordan (Florence. OR) 



Chuck Lahmeyer 

(Temple City. CA) 
John Urry (Si. Albans. VT) 
Jim Losteiter (Kelseyville, CA) 
Jorge Milke 

(Mexico City, Mexico) 
Ken Morrow (El Paso, TX) 
Fred Randall (Ypsilanti, Ml) 
KcnnetJi Raih (London, ONT) 
Norman Richard.s (Anglelon. TX) 
Larry Schafer (Fowler. Ml) 
Robed Shcrer (Columbus, MS) 
Troy Shoap (Shippensburg. PA) 
J.H. Smalley (Boulder. CO) 
G. Neil Spokes 

(Briarcliff Manor, NY) 
Dennis Sturdevanl 

{Rohncrt Park. CA) 
Robcn Washbume 

(Harrisburg. PA) 
Nolan Whitaker 

(Jeffersonville, KY) 
Carol Wycoff (Hobbs. NM) 



Back issues of AhoyI are available. See page 13 for ordering information. 



76 AHOY! 



piK^GRAM LISTINGS 



Attention new Ahoyf readersl You must read the following Informatton very carefully prior to typin 
in programs listed in Ahoyf Certain Commodore characters, commands, and strings of characters 



g 



and commands will appear in a special format. Follow the instructions and listings guide on this page. 




n the following pages you'll find several pro- 
grams that you can enter on your Commodore 
computer. But before doing so, read this entire 
page carefully. 
To insure clear reproductions, Ahoyl's program listings 
are generated on a daisy wheel printer, incapable of print- 
ing the commands and graphic characters used in Commo- 
dore programs- These are therefore represented by various 
codes enclosed in brackets [ ]. For example: the SHIFT 
CLR/HOME command is represented onscreen by a heart 
^ . The code we use in our listings is [CLEAR], The 
chart below lists all such codes which you'll encounter in 
our listings, except for one other special case. 

The other special case is the COMMODORE and SHIFT 
characters. On the front of most keys are two symbols. The 
symbol on the left is obtained by pressing that key while 
holding down the COMMODORE key; die symbol on the 
right, by pressing that key while holding down the SHIFT 
key. COMMODORE and SHIFT characters are represented 
in our listings by a lower-case V or "c" followed by the 
symbol of the key you must hit. COMMODORE J, for ex- 
ample, is represented by [c J], and SHIFT J by [s J], 



Additionally, any character that occurs more than two 
limes in a row will be displayed by a coded listing. For 
example, [3 "[LEFTD would be 3 CuRSoR left commands 
in a row, [5 "[s EPJl would be 5 SHIFTed English Pounds, 
and so on. Multiple blank spaces will be noted in similar 
fashion: e.g., 22 spaces as [22 ""]• 

Sometimes you'll find a program line that's too long for 
the computer to accept (C-64 lines are a maximum of 80 
characters, or 2 screen lines long; C-128 lines, a maximum 
of 160 characters, 2 or 4 screen lines in 40 or 80 columns 
respectively). To enter Uiese lines, refer to die BASIC Com- 
mand Abbreviations Appendix in your User Manual. 

On the next page you'll find our Bug Repellent programs 
for the C-128 and C-64. The version for your machine will 
help you pnxifread programs after typing them. (Please note: 
the Bug Repellent line codes that follow each program line, 
in the whited-out area, should not be typed in. See instruc- 
tions preceding each program.) 

On the second page following you will find Flankspeed, 
our ML entry program, and instructions on its use. 

Call Ahoy! at 212-239-6089 with any problems (if busy 
or no answer after three rings, call 212-239-0855). 
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BUG REPELLENT FOR THE 64 & 128 By BUCK CHILDRESS 

Please note: the Bug Repellent programs listed here are for Ahoy! programs published from the May 1987 issue onward! For older 
programs, use the older version. 

Type in. save, and run Bug Repellent. You'll be asked if you want automatic saves to take place. If so, you're prompted for the device, 
DISK (D) or TAPE (T). You then pick a starting file number, through 99. Next, you enter a name, up to 14 characters long. At this 
point. Bag Repellent verifies your entries and gives you a chance to change them if you want. If no changes are needed, Bug Repellent 
activates itself. (Pressing RETURN without answering the prompts dcfault-s to disk drive and begins your files with "OOBACKUP") 

As you enter program lines and press RETURN, a Bug Repellent code appears at the top of your screen. If it doesn't match the code 
in the program listing, an error exists. Correct the line and the codes will match. 

If used, automatic saves lake place every 15 minutes. When the RETURN key is pressed on a program line, the screen changes color 
to let you know that a save will begin in about three seconds. You may cancel the save by pressing the RUN STOP key. The file number 
inci«ments after each save. It resets to 00 if 99 is surpassed. After saving, or cancelling, the screen returns to its original color and 
the timer resets for 15 minutes. 



When you've finished using Bug Repellent, deactivate it by typing 
SYS 49152 IRETURN) for the Commodore 64 or SYS 4864 [RE- 
TURN] for the Commodore 128. 

C-64 BUG REPELLENT 

•10 PRINTCHR$(147)"LOADING AND CHECKING THE DATA[3"."]":J 

=49152 

•20 F0RB=f>TOU:READA:IFA<fX)RA>255THEN4O 
■30 P0KEJ+B,A:X=X+A:NEXTB:READA:IFA=XTHEN50 
•¥i PRINT:PRINT"ERROR IN DATA LINE:"PEEK(&4)*256+PEEK(63) 

:END 
•50 X-0:J=J+12:IFJ<49456THEN20 
•60 POKE198,0:POKE49456,0:A$="Y":B$=A$:CS="D":D$="DISK":D 

=8:PRINTCHR$(U7) 
■70 INPUT"DO YOU WANT AUTOMATIC SAVES (Y/N)";A$:PRINT:IFA 

$="Y"THEN90 

•m PRINT"NO AUTOMATIC SAVES[3"."]":GOT0150 
•90 P0KE49456,1:INPUT"DISK OR TAPE (D/T)";CS:IFC$<>"D"THE 

ND=1:D$="TAPE" 
■ir/j POKE49457,D:D$=D$+" DRIVE": PRINT: INPUT"FILE NUMBER ( 

0-99 )";N 
•110 N$=RIGHT$(STR$(N),2):IFN<lf/rHENN$=CHR$(48)+CHR$(N+48 

) 

•120 F$="BACKUP":PRINT:INPUT"FILENAME"!F$:F$=.N$+LEFT$(F$, 

14):L=LEN(F$) 
• 1 30 P0KE49458 , L : F0RJ=1T0L : POK E49'!. 58+ J , ASC ( Ml D$ ( F$ , J . 1 ) ) : 

NEXTJ: PRINT 
•140 PRINT"SAVING DEVICE ♦* "D$:PRINT"STARTING WITH ♦* "F 

$ 
•150 PRINT:INPUT"IS THIS CORRECT (Y/N)"iB$:IFB$<>"Y"THEN6 



■160 POKE770,131:POKE771,164:SYS49152:END 
•170 DATAl69,79,32,210,255.162,38,16rj,192,2f>4.3,3,l507 
■180 DATA208, 10, 162. 131, 160, 164, 169, 70, 32, 210, 255, 44, 1615 
•190 DATA169, 78, 32, 210, 255, 142, 2, 3, 140, 3, 3, 76, 1 113 
•2Vj DATA36. 193, 32, 96, 165. 134, 122, 132, 123, 32, 115, 0,1 180 
•210 DATA170, 240, 243, 162, 255, 134, 58, 144, 3, 76, 150. 164, 1799 
•220 DATA32, 107, 169, 32, 121. 165, 173, 0,2, 240. 5, 169, 1215 
•230 DATA79, 141, 2, 3. 76, 162. 164. 169. 0,133, 2, 133, 1064 
•240 DATA251, 133, 252, 133, 254, 24, 101, 20, 69, 254, 230, 254, 197 

5 

•250 DATA24, 101, 21, 69, 254, 170, 230, 254, 164, 252, 185, 0,1724 
•260 DATA2, 133, 253, 201, 34, 208, 6, 165, 2, 73, 255, 133, 1465 
•270 DATA2, 201, 32. 208, 4, 165, 2, 240, 8, 138, 24, 101, 1125 
'280 DATA253, 69, 254, 170, 44, 198, 254, 230, 252, 164, 253, 208, 23 

49 

•290 DATA213, 138, 41, 240, 74, 74, 74, 74, 24, 105, 129, 141, 1327 
•300 DATA44, 193, 138, 41, 15, 24, 105, 129, 141, 45, 193, 162, 1230 
•310 DATAO, 189, 43, 193, 240, 12, 157, 0,4, 173, 134, 2, 1147 
•320 DATA157, 0,216, 232, 208, 239, 169, 38, 141, 2, 3, 173, 1578 
•330 DATA48,193,240,23, 165,161.201,212,176,4, 165,160,1748 
•340 DATA24O,I3,238.32,208,16O,0,32,225,255,2fi8,6,1617 
•350 DATA32, 33, 193, 76, 38, 192, 232, 208, 242, 2f/J, 208, 239, 1893 
•360 DATA32, 68, 229, 169, 0,168. 174, 49, 193, 32, 186. 255, 1555 
•370 DATA173, 50, 193, 162, 51, 160, 193, 32, 189, 255, 169, 43, 1670 
•380 DATA166, 45, 164, 46, 32, 216. 255, 162. 1,189, 51, 193, 1520 
•390 DATA168, 200, 152, 201, 58, 144, 2, 169, 48, 157, 51, 193, 1543 
•400 DATA201, 48, 208, 3, 202, 16, 234, 32, 33, 193, 76, 116, 1362 
■410 DATA164, 206, 32, 208, 169. 0,170, 168, 76, 219, 255, 160, 1827 
•420 DATAl, 1,160, 0,0, 65, 72. 79, 89, 33, 0,0, 500 



C-128 BUG REPELLENT 

•10 PRINTCHR$ (147) "LOADING AND CHECKING THE DATA[3"."]":J 
=4864 

• 20 FORB=''/rol 1 : READA: IFA<i'iORA>255THEN40 

• 30 POKEJ+B , A : X=X+A : NEXTB: READA : IFA=XTHEN50 

•40 PRINT: PRINT"ERROR IN DATA LINE:"PEEK(66)*256+PEEK(65) 

:END 
■50 X=0:J=J+12:IFJ<5213THEN20 
•60 POKE208,O:POKE5213,O:A$="Y":B$-A$:C$="D":D$-"DISK":D= 

8:PRINTCHR${147) 
•70 INPUT"DO YOU WANT AUTOMATIC SAVES (Y/N)"; A$:PRINT:IFA 

$="Y"THEN90 

•&) PRINT"NO AUTOMATIC SAVESt3"."]":GOT0150 
■<¥> P0KE5213,1:INPUT"DISK OR TAPE (0/T)";C$;IFC$<>"D"THEN 

D=l:D$="TAPE" 
•\ffl P0KE5214,D:D$=D$+" DRIVE": PRINT: INPUT"FILE NUMBER (0 

-99)" ;N 
•110 N$=RIGHTS(STR$(N).2):IFN<ir/rHENN$=CHR$(48)+CHR$(N+48 

) 

• 120 F$="BACKUP" : PRINT: INPUT"FILENAME" ; F$ : F$=N$+LEFr$( F$ , 
14):I>=LEN(F$) 

•130 POKE5215.L:FORJ-lTOL:POKE5215+J,ASC(MID$(F$,J,l)):NE 

XTJ:PRINT 
■140 PRINT"SAVING DEVICE *♦ "D$:PRINT"STARTING WITH ** "F 

$ 
•150 PRINT: INPUT"IS THIS CORRECT (Y/N)";B$:IFB$<>"Y"THEN6 



•160 P0KE770,198:P0KE771,77:SYS4864:END 
•170 DATA32. 58, 20, 169, 41, 162, 19, 236, 3, 3, 208, 4, 955 
•180 DATA169, 198, 162, 77, 141, 2, 3, 142, 3, 3, 224, 19, 1143 
■190 DATA208, 7, 32. 125. 255. 79. 78, 0,96, 32, 125, 255, 1292 
•200 DATA79, 70, 70, 0,96, 162, 0,134. 251, 189, 0,2, 1053 
■210 DATA240, 19. 201, 48, 144, 9, 201, 58, 176, 5, 133. 251. 1485 
■220 DATA232, 208. 238, 134, 252, 165, 251. 208, 3, 76, 198. 77, 2042 
•230 DATA169, 0,166, 235, 164, 236, 133, 253, 133, 254, 142, 47, 193 

2 

•240 DATA20, 140, 48, 20, 24, 101, 22. 69, 254, 230, 254, 24, 1206 
•250 DATAlOl, 23. 69. 254. 170. 230, 254, 164, 252, 185, 0,2, 1704 
•260 DATA133, 251, 201, 34, 208. 6, 165, 253, 73, 255, 133. 253, 1965 
•270 DATA201, 32, 208, 4, 165, 253, 240, 8, 138, 24, 101, 251, 1625 
•280 DATA69, 254. 170. 44, 198, 254, 230, 252, 164, 251. 208, 213, 23 

07 

■290 DATA138, 41, 240, 74, 74, 74, 74, 24, 105, 65, 141, 88, 1138 
■3Vj DATA20, 138, 41, 15, 24, 105, 65. 141, 89, 20, 32, 79, 769 
■310 DATA20, 189, 85, 20, 240, 6, 32, 210, 255, 232, 208, 245, 1742 
■320 DATA174, 47, 20, 172, 48. 20, 24. 32. 240, 255, 173, 93, 1298 
•330 DATA20, 240, 27, 165, 161, 201, 212, 176, 4, 165, 160, 240, 1771 
■340 DATA17, 32, 65, 20, 238, 32, 208, 238, 1,214, 32, 225, 1322 
•350 DATA255, 208, 6, 32, 49, 20, 76, 198. 77, 232. 208, 242, 1603 
■360 DATA2f/), 208, 239, 32, 66, 193. 173. 95, 20, 162. 96, 160, 1644 
■370 DATA20, 32, 189, 255, 169, 0,170, 32, 104. 255, 169, 0,1395 
■380 DATA174, 94, 20, 168, 32, 186, 255, 169, 45, 174, 16. 18, 1351 
■390 DATA172, 17, 18, 32, 216, 255, 162, 1,189, 96, 20, 168, 1346 
•40O DATA2VJ, 152. 201, 58, 144, 2, 169, 48, 157, 96, 20, 201, 1448 
•410 DATA48, 208, 3, 202, 16. 234, 32, 49, 20, 141, 0,2, 955 
•420 DATA 76, 183, 77, 58, 59, 32, 65, 20, 2%, 32, 208, 206, 1222 
•430 DATAl, 214, 169, 0,170, 168, 76, 219, 255, 32. 79, 20, 1403 
•440 DATA169. 26, 141 ,0,214, 173, 0,214, 16, 251. 96. 162. 1462 
•450 DATAO, 142, 0.255. 96, 19, 18, 32. 32, 32, 32. 146, 8fj4 
•460 DATAO, I. 0,0, 65, 72, 79, 89, 33, 0,0, 0,339 
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FLANKSPEED FOR THE C-64 By GORDON F. WHEAT 

Flankspeed will allow you to enter machine language Ahoy! programs without any mistakes. Once you have typed the proeram 
■n save ,t for foture use. While entering an ML program with Flankspeed there is no need to enter spaces or hit the carriage 
T ,7.'aT?" " automatically. If you make an error in a line a bell will ring and you will be asked to enter it again 

To LOAD m a program Saved with Flankspeed use LOAD -name".l,l for tape, or LOAD "name^S,! for disk. The function keys 
may be used after the starting and ending addresses have been entered. 
fl-SAVEs what you have entered so far. 
D-LOADs in a program worked on previously. 

f5-To continue on a line you stopped on after LOADing in the previous saved work 

f7- Scans through the program to locate a particular line, or to find out where you stopped the last time you entered the program 
It temporarily freezes the output as well. j ff j ^.u uit ^jiu^iain. 



•Wi POKE532eO,12:roKE53281,ll 

•105 PRINT"[CLEAR][c 8][RVS0N][15" "]FUNKSPEED[15" "]"• 

•110 PRINT"[RVS0N][5" "]MISTAKEPR0OF ML ENTRY PR0GRAM[6" 

■}!? ??!!!Z"[?y^°''][^" "JCREATED BY G. F. WHEAT[9" "]" 



1987. ION INTERNATIONAL INC. 



OP 
FP 

JP 
FA 



120 PRINT"[RVS0N)[3" "JCOPR. 
[3" .11.1 

125 FORA=.54272r05<l296:POKEA,0:SEXT ND 

130 POKE54272,4:POKE54273,48:P0KE54277/;:POKE54278,249:P0 



KE54296.1.'> 
• 135 FORA=680T0699: READB: POKEA , B: NEXT 
■140 DATA169, 251. 166,253,164,254,32,216.255,96 
■145 DATA169. 0.166,251,164,252,32,213,255,96 
■150 B$="STARTING ADDRESS IN HEX";G0SUB430:AD=B:SR=B 
-155 G0SUB480:IFB=0THEH150 

■160 POKE251,T(4)+T{3)*16:POKE252,T(2)+T(l)*16 
•165 BS="ENDING ADDRESS IS iiEX":G0SUB430:EN=B 
■170 GOSUB470:IFB='jTHEN150 
•175 P0KE254.T(2)+T(1)+16:B=T(4)+1+T(3)*16 
•180 IFB>255THENB-B-255:POKE254,PEEK(254)+l 
•135 POKE253,B:PRINT 
•190 REM GET HEX LIME 

•195 GOSUB495: PRINT": [c P][LEFT]"; :F^RA='-/r08 
•200 F0RB=OTOl:G0TO25O 
•205 NEXTB 

•210 A%(A)=T(1)+TC0)*16:IFAD+A-1=ENTHEN340 
•215 PRINT" [c P][LEFr]"; 

•220 NEXTA:T=AD-CINT(AD/2.56)*256):PRINT" " 

• 225 F0RA=f/r07:T=T+A%( A) : I5T>255THENT=.T-255 

•230 NEXT 

•235 IFA%(8)<>TTHENqOSUB375:GOT0195 

•240 FOR.A=f/rO7:POKEAD+A.A%(A):MEXT:AD=.AD+8:G0TO195 

■245 REM GEI HEX I.VPUT 

■2.50 GETA$;IFA$=""THEN250 

■255 IFA$=CHR$(20)THEN305 

•260 IFA$=(;HR$(133)THEN535 

•265 rFA$=CHR$(I34)THEN560 

•270 IFA$>CHRS(135)THENPRINT" "tGOTO620 

•275 IFA$=CHR$(136)THENPRINT" ":G0T0635 

■280 IFA$>"@"ANDA$<"C"THENT(B)=ASC(A$)-55:G0T0295 

•285 IFA$>'7"ANDA$<":"THENT(B)=ASC(A$)-48:Gar0295 

•290 GOSUB415:GOT0250 

-295 PRlNTA$"[c PJILEFT]"; 

•300 COT0205 

•305 tFA>WHEN320 

•310 A=-1:IFB=1THEN330 

■315 G0T0220 

•320 tFB=OTHENPRINTCHRSC20);CHRS(2O) ; :A=A-1 

•325 A=A-1 

•330 PRINTCHR$(20);:GOT0220 

■335 RF>f LAST LINE 

•340 PRINT" ":T=AD-{INT(AD/256)+256) 

• 345 F0R8='-/r0A-l :T=T+A%(B) : IfT>255THENT=T-255 

•350 NEXT 

-355 IFAZ(A)<>TTHENGOSUB375:GOT0195 

•360 FORB=f/rOA-l:POKEAD+B,A%(B):NEXT 

•365 PRINT: PRINT"YOU ARE FINISHED' ":Gffr0535 

•370 REM BELL AND ERROR MESSAGES 

■375 PRINT: PRINT"LINE ENTERED INCORRECTLY": PR1NT^G0T041 5 

■380 PRINT: PRINT"INPUT A 4 DIGIT HEX VAUIE!":GOT0415 

•385 PRINT: PRINT"ENDING IS LESS THAN STARTING!":B=0-GOT041 



NP 

FL 

FF 

EK 

KP 

OE 

AM 

PE 

PG 

GM 

HG 

EC 

ED 

KD 

IH 

IJ 

FA 

EG 

II 

GL 

GI 

FL 

IM 

PA 

GA 

GO 

LM 

IG 

HO 

HE 

MI 
DJ 

JA 

PK 

FA 

BI 

BB 

FA 

BF 

FK 

PH 

CP 

KH 

OD 

OB 

LH 

BO 

MB 

LM 

JK 

PG 



•390 PRINT: PRINT"AODRESS NOT WITHIN SPECIFIED RANGEr":B=0: 
GOT0415 

■395 PRINT: PRINT"NOT ZERO PAGE OR ROMr ":B=0:GOT0415 

-400 PRINT"?ERROR IN SAVE":GOT0415 

•405 PRINT"?ERROR IN L0AD"rGOT0415 

•410 PRINT: PRINT: PRINT"END OF ML AREA": PRINT 

•415 POKE54276,17:POKE54276,16:RETURN 

•420 OPEN15,8,15:INPin'#15.A,AS:CLOSE15:PRINTA$:RETURN 

•425 REM GET FOUR DIGIT HEX 

•430 PRINT: PRINTBS;:INPUTrS 

* 435 IFLEN ( T$ ) O4THENG0SUB380 : G0T0430 

•440 F0RA=lTO4:A$=MIDS(T$,A,l);GOSUB450:IFr(A)=16THENGOSUB 



IK 
HK 

m 

JK 
10 
JO 
BF 
Dll 
IM 
OL 
JO 



380:GOT0430 

•445 NEXT:B-(T(1)*4096)+(T{2)*256>+(T(3)*16)+T(4):RCTURN 

•450 IFA$>"§"ANDA$<"G"THENT(A)=ASC(A$)-55:RCTURN 

•455 IFA$>"/"ANDA$<":"THENT(A)=ASC(A$)-48:RETURN 

•460 TCA)=16; RETURN 

•465 RFJ^ ADDRESS CHECK 

•470 IFAD>ENTHEN385 

•475 IFB<SRORB>ENTHEN390 

•480 IFB<2560R(B>40960ANDB<49152)0RB>53247THEN395 
•485 RETURN 

•490 REM ADDRESS TO HEX 
•495 AC=AD:A=4096:GOSUB520 
■500 A=256:G0SIIB520 
•505 A-16:GOSUB520 
•510 A=I:GOSUB520 
•515 RETURN 

•520 T=INTCAC/A);lFT>9THENA$=CHR$(T+55) :G0T0530 

•525 A$=CHR$(T+48) 

•530 PRINTA$i:AC=AC-A*T: RETURN 

•535 AS="**SAVE**":G0SUB585 

•540 OPEN1,T,1,A$:SYS680:CLOSE1 

•545 IFST=f/rHENEND 

• 550 G0SUB400: IfT=8THENG0SUB420 

•555 GOT0535 

•560 A$="**L0AD**":G0SUB585 

•565 OPEN l,T,O,A$:SYS690: CLOSE 1 

•570 IFST=64THEN195 

•575 GOSUB405:IFT=8THENGOSUB420 

•580 GOT0560 

-585 PRINT" ":PRINTTAB(14)A$ 

- 590 PR I NT : A$="" : INPUT"FI LENAME" ; A$ 

•595 IFA$=""THEN590 

•600 PRINT: PRINT"TAPE OR DISK?":PRINT 

■605 GETB$:T=1:IFB$="D"THENT=8:A$="^j:"+A$:RETURS 

•610 IFBS<>"T"THEN605 

•615 RETURN 

•620 B$="C0NTINUE FROM ADDRF^S":G0SUB430: AD=B 

•625 G0SUB475:IFB=^jTHEN620 

•630 PRINT: GOT0195 

•635 B$="BEGIN SCAN AT ADDRESS" ;G0SUB430:AD=B 

■640 GOSUB475:IFB=0THEN635 

•645 PRINT:GOT0670 

•650 FORB=f/r07:AC=PEEK(AD+B):GOSUB505:IFAD+B=ENTHENAD-SR:G 
OSUB410:GOT0195 lu 

•655 PRINT" ";: NEXTB ^B 

■660 PRINT:AD-A&f8 m 

•665 GETB$:IFBS=CHR$(136)THEN195 jd 

•670 GOSUB495: PRINT": ";;G0TO650 Kg 



AK 
KB 
GM 
NJ 
IC 
OL 
HO 
LE 
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HE 
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HF 
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JI 
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IIUI DHQTA MTI Letters on white background are Bug Repellent line codes. Do not enter them! Pages 77 and 78 explain these codes 
I III run IHIl I ! and provide other essential information on entering Ahoy! programs. Refer to these pages before entering any programs! 



BATTER UP! 

FROM PAGE 31 



•5 REM BATTER UP! BY JC HILTY 3/87 BE 
•10 G0SUB745 . DE 

•15 GOSUB515 CM 

•20 B=0:K=0:0T=0:R=0:X=1 FC 

•25 IFIN=10THEN1050 LC 

• 30 P0KE2040 , 200 : POKE2042 , 202 : FORT=0T050O 
:NEXT PO 

• 35 PRINT" [ HOME ] [ DOWN ] [ RVSON ] [ BLACK ] "TAB( 
2)B;TAB(5)K;TAB(9)0T;TAB(14)IN FH 

•40 IF0T=3THEN420 JI 

•45 IFK=3THEN0T=0T+1 : G0SUB105 : K=0 : B=0 : GOT 
035 GL 

• 50 IFB=4THENGOSUB380 : B=0 : K=0 : G0SUB105 : GO 
T035 HF 

•55 PRINT"[HOME][7"[DOWN]"]"TAB(22)"[12" 

"j" I A 

•60 PRINT"[HOME][7"[DOWN]"][YELLOW]"TAB(2 

2)P$(X);" ";PA(X):GOSUB690:FORT=OT01000: 

NEXT ND 

• 65 P0KE2042 , 203 : FORT=0T030O : NEXT : POKE204 

2,2O4:FORT=0TO20O:NEXT IF 

•70 Z=INT(8*RND(1)+1) FO 

•75 ONZGOSUBI20, 130, 120, 140, 120, 150, 120,1 

60 PH 

•80 W=206 PH 

•85 FB=-((PEEK( 56320) AND16)=0) LH 

■ 90 IFFB=1THENP0KE2040 , 208 : POKEV+21 , 31 : GO 

T0170 AB 

• 95 P0KE2044 . W : F0RT=0T050 : NEXT : W=W+1 : IFW= 

208THEN185 HJ 

•100 G0T085 FN 

•105 X=X+1:IFX=10THENX=1:RETURN lA 
•110 RETURN PM 

•115 REM COMPUTER PITCHES FK 

•120 P0KEV+8,88:P0KEV+9,162:P0KEV+21,23:F 

0RT=0T050: NEXT :P0KEV+9, 172 MK 

•125 RETURN AL 

•130 P0KEV+8,88:P0KEV+9,162:P0KEV+21,23:F 

0RT=0TO5O:POKEV+9,145 GD 

•135 RETURN BF 

• 140 POKEV+8 , 88 : POKEV+9 , 162 : POKEV+21 , 23 : F 
0RT=0T050 : POKEV+9 ,172: POKEV+8 ,120 JK 

•145 RETURN BP 

•150 POKEV+8, 88: POKEV+9, 162: POKEV+21, 23 :F 

0RT=0T050 : POKEV+9 , 200 : POKEV+8 , 70 IL 
•155 RETURN CJ 

•160 POKEV+8, 88: POKEV+9, 162: POKEV+21, 23 :F 

0RT=0T050 : POKEV+9 , 200 : POKEV+8 , 100 AC 
•165 RETURN DD 

•170 FORT=OT0150:NEXT:IFZ=10RZ=3ORZ=5ORZ= 

7THEN205 EP 

• 175 K=K+1 : FORT=OT0200 : NEXT : POKEV+21 , 7 : E$ 
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="STRIKE" EI 

•180 GOTO260 NE 

• 185 IFZ=10RZ=3ORZ=5ORZ=7THENE$="STRIKE": 
K=K+1 :FORT=0TO500:NEXT:G0TO195 AL 

•190 E$="BALL":B=B+1:FORT=OT0500:NEXT IN 
•195 POKEV+21, 7 :GOT0260 HC 

•200 REM BATTER HITS BALL FN 

•205 G0SUB705:P0KEV+21,7:E=RND(5)+PA(X)/1 

000 PD 

•210 IFE>1.1THENE$="H0ME RUN":G0SUB285:B= 

0:K=0:GOSUB105:GOT0260 NF 

•215 IFE>.9THENE$="TRIPLE":GOSUB310:B=0:K 

=0:GOSUB105:GOT0260 OC 

• 220 IFE> . 8THENE$="D0UBLE" : G0SUB335 : B=0 : K 

=0:GOSUB105:GOT0260 PA 

• 225 IFE> . 6THENE$="SINGLE" : GOSUB380 : B=0 : K 
=0:GOSUB105:GOT0260 JO 

•230 IFE>.5THENE$="F0UL BALL":G0SUB245:G0 

T0260 00 

•235 IFE>.3THENE$="GR0UND 0UT":0T=0T+1:G0 

SUB105 : B=0 : K=0 : GOT0260 LJ 

•240 E$="FLY OUT":OT=OT+1:B=0:K=0:GOSUB10 

5:GOT0260 BA 

•245 IFK<2THENK=K+1: RETURN DL 

•250 RETURN II 

•255 REM DISPLAY HITTING RESULTS KN 
•260 PRINT" [HOME] [ 13" [ DOWN]" ][ YELLOW ]"TAB 

(27)E$ CL 

•265 FORT=r/r02500:NEXT ND 

•270 PRINT"[H0ME][13"[D0WN]"] [RVSON] [GREE 

N]"TAB(27)"[10" "]" CE 

•275 GOT025 AD 

•280 REM HOMERUN MB 

•285 IFR=0THENYS=YS+1 :R=0:GOSUB455:GOSUB5 

10: RETURN IK 

• 290 IFR=10RR=20RR=4THEN YS=YS+2 : R=0 : GOSUB 
455 :G0SUB510; RETURN GJ 

• 295 IFR=30RR=50RR=6THENYS=YS+3 : R=0: GOSUB 
455 :GOSUB510: RETURN PI 

•300 IFR=7THENYS=YS+4:R=0:E$="GRAND SLAM" 

:GOSUB455:GOSUB510: RETURN BF 

•305 REM TRIPLE JK 

•310 IFR=0THENR=4:G0SUB455: RETURN PD 

• 31 5 IFR=10RR=20RR=4THENYS=YS+1 : R=4 : GOSUB 

455:GOSUB510:RETURN CJ 

• 320 IFR=30RR=50RR=6THENYS=YS+2 : R=4 : GOSUB 



455 :G0SUB510: RETURN 
• 325 IFR=7THENYS=YS+3 : R=4 : G0SUB455 : G0SUB5 

10: RETURN 
•330 REM DOUBLE 
* 335 IFR=0THENR=2 : G0SUB455 : RETURN 
•340 IFR=1THENR=6 : G0SUB455 : RETURN 
• 345 IFR=2THENYS=YS+1 : R=2 : G0SUB455 : G0SUB5 



lA 

CN 
JK 
BM 

CK 

KK 



10: RETURN 

•350 IFR=3THENYS=YS+1:R=6:G0SUB455: RETURN IF 
• 355 IFR=4THEN YS=YS+1 : R=2 : G0SUB455 : G0SUB5 



I 10: RETURN NG 

• 360 IFR=5THENYS=YS+1 : R=6 : G0SUBA55 : G0SUB5 
10: RETURN PI 

•365 IFR=6THENYS=YS+2:R=2:GOSUB455:GOSUB5 
10: RETURN PB 

• 370 IFR=7THENYS=YS+2 : R=6 : G0SUB455 : G0SUB5 

t 10: RETURN CD 

•375 REM SINGLE OR WALK JP 

•380 IFR=0THENR=1:G0SUBA55: RETURN AA 

•385 IFR=1THENR=3:G0SUB455: RETURN FE 

•390 IFR=3THENR=7:GOSUB455: RETURN JF 
• 395 IFR=4THENYS=YS+ 1 : R=l : G0SUB455 : G0SUB5 

10: RETURN EP 

, ^400 IFR=5THENYS=YS+1:R=3:G0SUB455:G0SUB5 
10: RETURN Dl 

• 405 IFR=6THENYS=YS+1 : R=5 : G0SUB455 : G0SUB5 

10: RETURN MP 

•410 IFR=7THENYS=YS+1 :R=7:G0SUB455:G0SUB5 
10: RETURN HD 

•415 IFR=2THENR=5:GOSUB455: RETURN CP 
•420 I=INT(4*RND(6)) Pj 

•425 PRINT"[ HOME] [13" [DOWN]" ][YELLOW]"TAB 
(22) "COMPUTER "I:G0SUB720 EG 

•430 CS=CS+I:PRINT"[H0ME][13"[D0WN]"][RVS 
0N][GREEN]"TAB(22)"[12" "]" GL 

•435 PRINT" [HOME] [4" [DOWN]" ][YELLOW]"TAB( 
32)CS:G0SUB105 BB 

■440 IN=IN+1:B=0:K=0:R=0:0T=0:G0SUB455 HN 
•445 GOT025 LF 

•450 REM PLACE BASERUNNERS AP 

•455 R=R+l:0NRGOSUB465,470,475,480,485,49 

0,495,500 DP 

•460 R=R-1: RETURN LI 

•465 P0KEFI,160:P0KESN,160:P0KETH,160:RET 

URN BK 

•470 P0KEFI,86:P0KESN,160:P0KETH,160:RETU 

RN BL 

•475 P0KESN,86:POKEFI,160:P0KETH,160:RETU 

RN AM 

• 480 POKETH , 160 : POKESN , 86 : POKEFI , 86 : RETUR 

N LG 

•485 POKETH, 86: POKESN, 160: POKEFI, 160 :RETU 

RN OG 

• 490 POKESN , 160 : POKETH , 86 : POKEFI , 86 : RETUR 

N LI 

• 495 POKEFI , 160 : POKESN , 86 : POKETH , 86 : RETUR 

N JB 

• 500 POKEFI , 86 : POKESN , 86 : POKEFI , 86 : RETURN FJ 
•505 REM UPDATE SCORE KN 

•510 PRINT"[H0ME][3"[DOWN]"][YELL0W]"TAB( 

32 )YS: RETURN GI 

•515 REM PLAYING FIELD NE 

•520 P0KE53281,8:P0KE53280,0 BP 

•525 PRINT" [ CLEAR ][RVSON][ BLACK] [3" "]B 

S OUT INN[3" "][c 7][19" "]" DD 
•530^^PRINT"[RVSON][ BLACK] [20" "][c 7] [19" 

"]" ML 

•535 PRINT" [RVSON][ BLUE] [20" "][c 7] [BLA 



CK][16" "][c 7] " ME 

•540 F0RT=0T02 : PRINT" [RVSON][ BLUE] [20" "] 

[c 7] [BLACK] "TAB(36)" [c 7] ":NEXT BJ 
•545 PRINT" [RVSON][c 2] [20" "]rc 7] [BLAC 

K] "TAB(36)" [c 7] " lL 

•550 F0RT=0T01 : PRINT" [RVSON][ GREEN] [20" " 

][c 7] [BLACK] "TAB(36)" [c 7] ":NEXT KH 
•555 PRINT" [RVSON][ GREEN] [20" "][c 7] [BL 

ACK][16" "][c 7] " MJ 

•560 PRINTTAB(20)"[RVS0N][c 7] [BLACK] [ 

c 7][12" "][BLACK] [c 7][3" "]" GE 
•565 PRINT" [RVSON][ GREEN] [20" "][BLUE] [ 

BLACK] [BLUE][12" "][BLACK] [BLUE][3" "] 

EB 
•570 PRINT" [RVSON][ GREEN] [21" "][s Nl[15" 
"][sM] " ED 

•575 PRINT"[RVS0N][6" "][RVSOFF][sEP] [6" 
"][c *][RVS0N][6" "][s N][17" "][s M]" AL 
•580 PRINT" [RVSON][ 20" "] [s M][17" "][s N 

]" OD 

•585 PRINT" [c *][RVS0N][18" "] [RVSOFF][sE 
P][RVSON] [s M][15" "][s N] " AD 

•590 PRINT" [c *][RVS0N][16" "][RVSOFF]rs 
EP] [RVSON] [s M][13" "][s N] " KE 
•595 PRINT" [c *][RVS0N][14" "][RVSOFF][ 
SEP] [RVS0N][3" "][s M][5" "][WHITE] [G 
REEN][5" "][s N][3" "]" aP 

•600 PRINT" [3" "][WHITE][5"[c P]"][4" "][ 
5"[c P]"][3" "] [RVSON] [GREEN] [4" "][s M] 
[3" "][s N] [s M][3" "][s N][4" "]" JG 
•605 PRINT" [WHITE][s N][4" "][s N][4" " 
][s M][4" "][s M] [RVSON] [GREEN] [5" "][ 
s M] [s N][3" "][s M] [s N][5" "]" HB 
•610 PRINT" [WHITE][s N][4" "][s N] [RVSO 
N][4" "][RVSOFF] [s M][4" "][s M] [RVSON 
][ GREEN ][ 6" "] [WHITE] [GREEN] [s Z] [W 
HITE] [GREEN] [6" "]" DL 

•615 PRINT" [ WHITE] [s N][4" "][s N] [c *] 
[RVSON] [RVSOFF][sEP] [s M][4" "][s M] 
[RVSON] [GREEN] [7" "][s M][3" "][s N][7" 
"1" FL 

•620 PRINT" [WHITE] [4" "][s N]"TAB(15)"[s 
M][4" "] [RVSON] [GREEN] [8" "][s M] [s N][ 
a J e;^ 

•625 PRINT" [ WHITE ][ 4" [c Y]"]"TAB(16)"[4"[ 
c Y]"][RVS0N][GREEN][9" "][WHITE] [GREEN 
][9" "]" EP 

• 630 FORX=2004TO2022 : POKEX , 160 : POKEX+5427 
2,5:NEXT kO 

• 635 X=1063 : F0RT=0T024 : POKEX , 1 60 : POKEX+54 
272, 0:X=X+40: NEXT bD 

•640 PRINT" [HOME] [3"[ DOWN ]"][YELLOW]"TABC 
22)T$;TAB(32)YS:PRINT"[HOME][4"[DOWN]"]" 
TAB(22)C$;TAB(32)CS CH 

• 645 PRINT" [ HOME ] [ 6" [ DOWN ] " ] "TAB( 22 ) "NOW 
BATTING" jE 

•650 POKEV+16,0:P0KEV+27,0:POKEV+23,15:PO 
KEV+29,15:POKEV+28,7 QC 
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655 P0KEV+37,10:P0KEV+38.0 OA 

660 POKE2040 , 200 ; POKEV+39 , 7 : POKEV , 30 : POK 
EV+1,150 HM 

665 P0KE2041 ,201 :POKEV+40, 1 :P0KEV+2, 30:P 
OKEV+3,192 NA 

670 P0KE2042 , 202 : POKEV+41 , 6 : POKEV+4 , 78 : P 
OKEV+5,120 LA 

675 P0KE2043 , 209 : POKEV+42 , : POKEV+6 , 64 : P 
OKEV+7,160 LP 

680 P0KE2044 , 205 : POKEV+43 , 1 : POKEV+8 , 80 : P 
OKEV+9,192 MI 

685 POKEV+ 2 1,7; RETURN MA 

690 FORT=0T024:POKES+T,O:NEXT PG 

695 POKES ,150: POKES+1 , 200 : POKES+5 , 8 : POKE 
S+6,248:P0KES+24,15:P0KES+4,17 AM 
700 FORT=0TO0500: NEXT :P0KES+4, 16: RETURN EP 
705 FORT=0TO24:POKES+T,0:NEXT MH 

710 POKES+24 , 15 : POKES+1 , 80 : POKES+5 , 80 : PC 
KES+6,245 m 

715 POKES+4 ,129: FORT=0TO100 : NEXT : POKES+4 
,128: RETURN CK 

720 F0RT=0T024:POKES+T,0:NEXT MA 

725 POKES+18,128:P0KES,75:POKES+6,240:PO 
KES+14 ,12: POKES+15 , 250 : POKES+24 , 207 NH 
730 FORL=0TO30 : POKES+4 ,17: POKES+1 , PEEK(S 
+27) HJ 

735 F0RT=0T01 00 r NEXT: NEXT :P0KES+4,0 ME 
740 RETURN HE 

745 P0KE5328 1,12: P0KE53280 , : PRINT" [ CLEA 
R][6"[DOWN]"][BLUE]"TAB(14)"[12"*"]" EG 
750 PRINTTAB(14)"*[10" "]*":PRINTTAB(14) 
"♦BATTER UP!*" NL 

755 PRINTTAB(14)"*[10" "]*":PRINTTAB(14) 
"[12"*"]":PRINTTAB(19)"BY" GN 

760 PRINTTAB(16)"JC HILTY": PRINT: PRINT PE 
765 PRINT"PLEASE WAIT WHILE WE BUY SOME 
PEANUTS.." HC 

770 DIMPA(9),P$(9):YS=0:CS=0:IN=1:SN=173 
3:TH=1850:FI=1856 FB 

775 8=54272 :V=53248 DO 

780 FORX=1280r/rO13438:READA:POKEX,A:NEXT JB 
785 F0RX=1T09:READP$(X):NEXT CE 

790 PRINT" [CLEAR] [DOWN] PLEASE ENTER THE 
NAME OF YOUR TEAM[4"."]" CA 

795 PRINT"[4"."]UP TO 10 LETTERS." OK 
800 INPUTT$:IFLEN(T$)>10THEN790 JM 
805 IFLEN(T$)<1THENT$="PITTSBURGH" DD 
810 PRINT" [CLEAR ][ DOWN ]PLEASE ENTER THE 
COMPUTER TEAM ' S N AME . . " HH 

815 PRINT".. UP TO 10 LETTERS." JF 
820 INPUTC$:IFLEN(C$)>10THEN810 JF 
825 IFLEN(C$)<1THENC$="NEW YORK" IH 
830 FORX=1T09:PA(X)=INT(300*RND(5)+100) : 
NEXT NJ 

835 PRINT"[CLEAR][DOWN]LINEUPS AND BATTI 
NG AVERAGES": PRINT :PRINTT$: PRINT AE 
840 F0RX=1T09:PRINTP$(X);" ";PA(X) :NEXT: 
PRINT: PRINT CC 
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845 PRINT"PRESS P TO PRINT LINEUP ON PRI 
NTER[4"."]" EA 

850 PRINT"[4"."]ANY OTHER KEY TO CONTINU 
E." HP 

855 GETA$:IFA$=""THEN855 NJ 

860 IFA$="P"THENG0SUB1030 KB 

865 RETURN PC 

870 REM SPRITE DATA NE 

875 DATA 240,42,0,240,42,0,240,42,128,25 
2,42,160,60,41,64,60,41,64,63,53,64 10 
880 DATA 3,53,64,3,205,0,2,234,0,10,250, 
128,10,186,128,14,190,128,53,94,128 DJ 
885 DATA 53,93,240,61,171,112,10,169,112 
,10,170,240,15,170,0,15,252,0,15,252,0 OJ 
890 DATA CK 

895 DATA 10,170,0,10,170,0,10,170,128,10 
,171,128,10,174,128,2,174,128 PD 

900 DATA 2,174,128,2,174,128,2,174,128,2 
,174,0,2,174,0,10,170,0,10,186,0 FB 
905 DATA 10,191,240,10,188,0,10,128,0,11 
,192,0,15,252,0,15,0,0,0,0,0,0,0,0,0 ML 
910 DATA 0,10,0,0,42,0,0,5,0,0,5,0,0,1,0 
,0,10,128,0,42,160,0.170,168,0,138,136 LO 
915 DATA 0,138,136,0,169,168,0,15,192,0, 
10,128,0,10,128,0,8,128,0,8,128 FN 
920 DATA 0,8,128,0,12,192,0,12,192,0,60, 
240,0,0,0,0 HC 

925 DATA 0,10,0,0,42,0,0,5,0,0,5,0,0,1,0 
,0,10,0,0,10,0,0,10,0,0,10,0,0,10,0 BN 
930 DATA 0,10,0,0,15,0,0,1,0,0,2,0,0,2,0 
,0,2,0.0,2,0.0.3,0,0,3,0,0,15,0 JF 
935 DATA 0,0,0,0 HI 

940 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
,0,0,0,10,0,0,10,36.0.165,128,0,170,0 NO 
945 DATA 0,138,48,0,138,128,0,138,0,0,66 
.0,0,2,0,0,2,0,0,3,0,0,0,0,0,0,0 AC 
950 DATA 0,0,0,0,0,0,0 IC 

955 DATA 0,0,0,0,0,0,0.0,0,0,0,0,0,0,0,0 
,0,0,0,0,0,0,24,0,0,60,0,0,24,0 JE 
960 DATA 0,0,0,0,0,0,0,0.0,0,0,0,0,0,0,0 
,0,0,0,0,0.0.0.0.0,0,0,0,0,0,0,0,0,0 JH 
965 DATA 0,0,0,0,0,0.0,0,0,0,0.0,0,0,0,0 
,0,0,0,24,0,0,60,0,0,126,0,0,60,0 KG 
970 DATA 0,24,0,0,0,0,0,0,0,0,0,0,0,0,0, 
0,0,0.0,0.0,0,0.0,0,0,0,0,0,0,0,0,0,0 BI 
975 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
,0,0,0,60,0,0,255,0,0,255,0,0,255,0 JC 
980 DATA 0,255,0,0,60,0,0,0,0,0,0.0,0.0, 
0,0,0.0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 PP 
985 DATA 0,42,0,0,42,0,0,42,128,0,42,160 
,0,41,64,0,41,64,0,21,64,0.21,64 AM 
990 DATA 0,165,0,2,170,0,2,170,128,2,170 
,128,2,170,128,2,170,128,10,170,128 CN 
995 DATA 10,170.128,10,170,128,10,170,0. 
15,234,0,15,252,0,15,252,0,0 AA 

1000 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 
0,0,0,0,0,0,0,0,0,0,0,124,135,255,252 MG 
1005 DATA 255,255,252.128,63,252,0,0,0,0 



,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 EC 
•1010 DATA 0,0,0,0,0,0,0 NO 

•1015 REM PLAYER NAMES KL 

•1020 DATA ROCKY, SPIKE, PETE, WILLIE, HAMMER 

, JIM, MOOSE, BOOMER, HAWK EG 

•1025 REM PRINTOUT LINEUP BN 

•1030 PRINT" [CLEAR] [DOWN] [DOWN] MAKE SURE 

PRINTER IS ON [4"."]": PRINT" [A"."] PRESS A 

NY KEY." DG 

•1035 GETA$:IFA$=""THEN1035 • MC 
•1040 0PEN3, 4,0: PRINTS, "LINEUP AND AVERA 

GES FOR ";T$ MA 

•1045 F0RX=lT09:PRINT#3,P$(X)j" ";PA(X):N 

EXT:CL0SE3 JF 

•1046 PRINT :PRINT"PRESS ANY KEY TO BEGIN 

GAME." AO 

•1047 GETA$:IFA$=""THEN1047 LB 

•1048 RETURN KK 

•1049 REM GAME OVER AK 

•1050 POKEV+21,0 HB 

• 1055 P0KE53281 , : P0KE53280 , : PRINT" [ CLEA 

R][8"[D0WN]"][c 7]"TAB(14)"[12"*"]" EN 
•1060 PRINTTAB(14)"*SC0REB0ARD*":PRINTrAB 

(14)"[12"*"]":PRINT: PRINT DJ 

•1065 PRINTTAB(14)T$;YS:PRIN1TAB(14)C$;CS HM 
•1070 END LC 



eREEN SCREEN BLUES 

FROM PAOE 32 

SCRNSWAP.ASM 

2 "* SCRNSWAP.ASM 
"* RUPERT REPORT #44 

REM USE INTERRUPT ROUTINE TO READ 

RM 40/80 COLUMN MODE OF C-128 

REM AND SWITCH A RELAY TO ENABLE 

8 REM THE SELECTED VIDEO OUTPUT 

105 "SYS EQU $0A00 ; SYSTEM VECTOR 

106 "IRQ EQU $0314 ;IRQ VECTOR 

107 "MODEFLG EQU $D7 

108 "* BIT 7 = 1/0 = 80/40 COL MODE 

109 "*********************************** 

110 "* 

111 " ORG $1500 

112 "* 

113 "INIT ;SYS 5376 FROM BASIC 

114 "* SET UP IRQVEC 

115 " LDA IRQVEC ;BEEN HERE BEFORE? 

116 " BNE INITl ;YES, SKIP IT 

117 " LDA IRQVEC+1 

118 " BNE INITl ; ALREADY BEEN HERE 



3 
4 
5 
6 

7 



119 

120 

121 

122 

123 

124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 

158 

159 

160 

161 

162 

163 

164 

165 

166 

167 

168 

169 

170 

171 

172 

173 

174 

175 

176 



;SAVE IRQ VALUE 



' LDA IRQ 

' STA IRQVEC 

' LDA IRQ+1 

' STA IRQVEC+1 

'* SAVE OLD SYSTEM VECTOR 

LDA SYS ;GET CURRENT VALUE 

STA SYSVEC ;SAVE IT 

LDA SYS+1 

STA SYSVEC+1 
'* MAKE SYSTEM VECTOR POINT TO US 

LDA #<RESTART ;GET LSB 
' STA SYS 
' LDA #>RESTART 
' STA SYS+1 
'INITl 

' JSR CONFIG 
' RTS 



;GET MSB 



;GET MODE/SET IRQ 
;BACK TO BASIC 



* SYS POINTS HERE »»»»»» 

* 

RESTART 

JSR CONFIG 
' JMP (SYSVEC) 
'CONFIG 
' LDA MODEFLG 
' AND #$80 
' STA PREVMD 
' JSR RELAY 



;GET MODE/SET IRQ 
; CONTINUE WARM BOOT 



READ MODE 
BIT 7 ONLY 
SAVE IT 
;SET RELAY ON/OFF 
'* POINT IRQ TO OUR ROUTINE 
' SEX ; DISABLE INTR 

* LDA #<MAIN ;PT IRQ TO MAIN 
' STA IRQ 

' LDA #>MAIN 

' STA IRQ+1 

' CLI ; ENABLE INTR 

' RTS ; RETURN 

'PREVMD DFB $80 ; PREVIOUS MODE 
'IRQVEC DA $0000 ;ORIG IRQ VECTOR 
'SYSVEC DA $0000 ;0RIG SYS VECTOR 

* IRQ VECTOR POINTS HERE »»»» 
* 

'MAIN 

* CHECK MODE 
LDA MODEFLG 
AND #$80 

' CMP PREVMD 

' STA PREVMD 

' BEQ EXIT 

' JSR RELAY 
EXIT 

JMP (IRQVEC) ; CONTINUE IRQ 

* USE PREVMD TO TURN RELAY ON/OFF 
RELAY 

LDA $0 ;SET DDR TO OUTPUT 
ORA #$10 ;SET BIT 4 
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;GET CURRENT MODE 
;BIT 7 

;M0DE CHANGE? 
;(SAVE CURRENT MODE) 
;N0 MODE CHANGE 
;YES, SET RELAY 



HUIDflQTAMTI l-^tters on white background are Bug Repellent line codes. Do not enter them! Pages 77 and 78 explain these codes 

I IVIr Un Inn I ! and provide other essential information on entering Ahoy! programs. Refer to these pages before entering any programs! 



177 " ST A $0 

178 " LDA $1 

179 " AND #$EF 

180 " STA $1 

181 " LDA #1 

182 " STA $00C0 

183 " BIT PREVMD 

184 " BMI RLYON 

185 "RLYOFF 

186 " LDA $1 

187 " ORA #$20 

188 " STA $1 

189 " LDA $D011 

190 " ORA #$10 

191 " STA $D011 

192 " LDX #0 

193 " STX $D030 

194 " RTS 

195 "RLYON 

196 " LDA $1 

197 " AND #$DF 

198 " STA $1 

199 " RTS 



READ I/O PORT 
CLEAR BIT 4 

NON-0 TO 192 
INTERLOCK BYTE 
BIT 7=1(80 COL.)? 
YES, TURN RLY ON 
NO, TURN IT OFF 
READ I/O PORT 
SET BIT 5 
RELAY OFF 
SET SLOW MODE 
SET BIT 4 
UNBLANK VIC 

SET SLOW SPEED 



READ I/O PORT 
CLEAR BIT 5 
RELAY ON 

SCRNSWAP.LOADER 



110 REM SCRNSWAP LOADER CA 

120 REM RUPERT REPORT #44 DP 

130 REM FOR C128 ONLY BL 
140 REM================================= JM 

150 PRINT"LOADING [3"."]" AJ 
160 M=5376 :REM $1500 INITIAL ADDRESS « OD 

170 READ B$ JE 

180 IF B$="XX" THEN 240 KP 

190 B=DEC(B$) EH 

200 CK=CK+B :REM CHECKSUM JG 

210 POKE M,B CL 

220 M=M+1 PL 

230 GOTO 170 AA 
240 IF CKO 12298 THEN PRINT"DATA ERROR" 



STOP 



:REM 



<««« NF 

JF 



250 PRINT"PROGRAM IS LOADED" 

260 SYS 5376 :REM $1500 START ADDRESS « CD 



270 END 

5376 DATA AD, 4E, 15, DO, 27, AD, 4F 

5384 DATA DO, 22, AD, 14, 03, 8D, 4E 

5392 DATA AD, 15, 03, 8D, 4F, 15, AD 

5400 DATA OA, 8D, 50, 15, AD, 01, OA 

5408 DATA 51, 15, A9, 30, 8D, r/j, QA 

5416 DATA 15, 8D, 01, OA, 20, 36, 15 

5424 DATA 20, 36, 15, 6C, 50, 15, A5 

5432 DATA 29, 80, 8D, 4D, 15, 20, 64 

5440 DATA 78, A9, 52, 8D, 14, 03, A9 

5448 DATA 8D, 15, 03, 58, 60, 80, 65 

5456 DATA 03, 40, A5, D7, 29, 80, CD 

5464 DATA 15, 8D, 4D, 15, FO, 03, 20 
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IP 
15 MP 
15 AH 
00 GC 
8DKA 
A9DH 
60 NK 
D7 AL 
15 LI 
15 NB 
FA IH 
4D0B 
64 BA 



•5472 DATA 15, 6C, 4E, 15, A5, 00, 

•5480 DATA 85, m, A5, 01, 29, EF, 

•5488 DATA A9, 01, 85, CO, 2C, 4D, 

•5496 DATA 14, A5, 01, 09, 20, 85, 

•5504 DATA 11, DO, 09, 10, 8D, 11, 

•5512 DATA 00, 8E, 30, DO, 60, A5, 

•5520 DATA DF, 85, 01, 60 

•5524 DATA XX 



09, 10 GN 
85, 01 MH 
15, 30 KE 
01, ADPD 
DO, A2MM 
01 , 29 AB 
IL 
NL 



FROM PAGE 22 



•10 G0T01130 FA 

•20 IFER=30THENTRAP2O:GOTO910 FL 

• 30 SLOW : C0L0R4 , 3 : COLORO , 3 : C0L0R5 , 2 : GRAPH 
ICO , 1 : PRINT"ERROR : " ; : IFDS>OTHENPRINTDS$ 
: ELSEPRINTERR$ ( ER) : PRINTTAB( 7 ) "IN LINE"E 

L LK 

•40 PRINT" [DOWN] [DOWN] PRESS ANY KEY TO CO 
NTINUE" : GETKEY A$ : C0L0R4 , 1 : COLORO , 1 : GRAPH 
ICl : TRAP20 : GOTO940 KO 

•50 C0L0R1,2:IFDR=0THEN80 OG 

•60 L0CATECX-24,CY-50:IFRD0T(2)=1THENDRAW 

0,CX-24,CY-50:ELSEDRAWl,CX-24,CY-50 JB 
•70 G0T0150 GC 

• 80 COLORl , 2 : X=INT( (CX-24) /8) : Y=INT( (CY-5 
0)/8):SPRITEl,0:SPRITE2,l,7 JF 

• 90 M0VSPR2 , X*8+24 , Y*8+50: GETKEY A$ : IFA$=C 
HR$(13)THENSPRITE1,1:SPRITE2,0:GOT0130:E 
LSEIFA$=CHR$(20)0RA$="[LEFT]"THENX=X-(1A 
NDX>0):G0T090 IN 

100 IFA$=" [ RIGHT] "THENX=X+( 1ANDX<39) : GOT 
090:ELSEIFA$<" "THEN90 KP 

no CHAR1,X,Y,P$+A$,1:X=X+1:IFX=40THENX= 
NP 

120 GOT090 GL 

130 J=JOY(2):GETA$:IFA$<>""THEN220 LH 
140 IFJ>127THENJ=J-128:G0T0310 GL 
150 IFCY<180ANDCY>81THENCX=CX+XX(J):CY=C 
Y+YY(J) :ELSECX=CX+XX(J)*5:CY=CY+YY(J)*4 CF 
160 IFCX<24THENCX=24 : ELSEIFCX>332THENCX= 
332 EE 

170 IFCY<50THENCY=50 : ELSEIFCY>248THENCY= 
248 EI 

180 IFDR=3THENBEGIN:IFCY<196THENCY=196:E 
LSEIFCX<26THENCX=26 : ELSEIFCX>262THENCX=2 
62 BA 

190 BEND NP 

200 M0VSPR1,CX,CY:IFDR>1THENM0VSPR3,CX,C 
Y DI 

210 GOTO 130 01 

220 IFA$=" [ UP] "THENCY=CY-8 : ELSEIFA$=" [ DO 
WN ] "THENCY=CY+8 : ELSEIFA$=" [ LEFT ] "THENCX= 
CX-8 : ELSEI FA$=" [ RIGHT ] "THENCX=CX+8 PP 
230 IFA$=CHR$(13)THENJ=128:G0T0140 KB 
240 IFA$=" "ANDDR=3THEN520 IB 



•250 IF(A$<"C"0RA$>"W")0RDR>1THEN160 CE 
•260 IFA$="D"THEN360:ELSEIFA$="T"THEN370: 
ELSEIFA$="E"THEN380 LD 

•270 IFA$="L"THEN390:ELSEIFA$="H"THENA10: 

ELSEIFA$="M"THEN430 PL 

•280 IFA$="P"THEN530:ELSEIFA$="0"THEN720: 

ELSEIFA$="C"THEN850 00 

• 290 IFA$="G"THEN870 : ELSEIFA$="S"THEN890 : 

ELSEIFA$="Q"THEN910 DL 

•300 G0T0160 FG 

•310 IFDR=3THEN490:ELSEIFDR=2THEN460 HJ 
•320 IFCY<180ANr)CY>81THEN50 EA 

•330 FORI=OT011:IFCX>TX(I)ANDCX<BX(I)ANDC 

Y>TY(I)ANDCY<BY(I)THEN350 PF 

•340 NEXT: GOTO 160 CF 

• 350 ONI+1G0TO360 , 370 , 380 , 390 , 410 , 430 . 530 

,720,850,870,890,910 KM 

•360 GOSUB970:GOTO13O OP 

•370 GOSUB980:GOT0130 QC 

•380 A$="ERASE BANNER :":G0SUB920:IFRTHENG 

0SUB1060:G0T0130:ELSE130 GC 

•390 COLORl, 16 :CHAR1, 0,17, "ENTER BANNER L 

ENGTH (1-120) :":N=l:MX=3:X=31:Y=17:GOSU 

B1000:IFZ$=""THEN940 JM 

•400 IFZ<10RZ>120THEN390:ELSEL=Z:G0SUB106 
0:GOT0940 GI 

•410 COLORl, 16 :CHAR1, 0,1 7, "ENTER BANNER H 
BIGHT (8-24) :":N=1:MX=2:X=28:Y=17:G0SUB 
10OO:IFZ$=""THEN940 DD 

•420 IFZ<80RZ>24THEN410:ELSEH=Z:G0SUB1060 
:G0T0940 CL 

•430 DR=2:C0L0R1,2:CHAR1,2,17,"SELECT ARE 
A TO MAGNIFY & PRESS FIRE" JD 

•440 F0RI=18T024:CHAR1,0,I,BL$:NEXT HC 
■450 SPRITE1,0:CX=24:CY=81:M0VSPR3,24,81: 
SPRITES, 1, 6,, 1:G0T01 30 HF 

•460 FAST:CHAR1,0,17,BL$-CHAR1,3,17,"PRES 
S SPACE BAR TO RETURN" :DR=3:X=CX-24:Y=CY 
-50 : 0X=X : 0Y=Y : F0RJ=YT0Y+ 13 : F0RI=XT0X+47 DC 
•470 L0CATEI,J:A=(I-X)*5:B=(J-Y)*4+144:IF 
RD0T(2)THENB0X1,A,B,A+4,B+3,,1 MF 

•480 NEXT: NEXT :SPRITE3,0;SL0W:SPRITE1,1:C 
Y=196:M0VSPRl,CX,CY:GOT0130 EI 

•490 X=INT(CX-24):Y=INT(CY-50) PK 

•500 L0CATEX,Y:A=INT(X/5):B=INT((Y-144)/4 
):IFRD0T(2)=lTHENB0X0,A*5,B*4+144,A*5+4, 
B*4+3+ 1 44 , , 1 : C=0 : ELSEBOX 1 , A*5 , B*4+ 1 44 , A* 
5+4,B*4+3+144,,l:C=l MJ 

•510 DRAWC,OX+A,OY+B:GOT0150 LM 

•520 G0SUB990:G0SUB970: SPRITES, 0:GOT01 30 OK 
•530 COLORl, 8: CHAR 1,0, 17, "PREPARE PRINTER 

AND PRESS SPACE BAR" MF 

•540 GETKEYA$:CHAR1,0,17,BL$:CHAR1,0,17," 
PRINTING [3"."] SPACE-ABORTS F-FAST ON/0 
FF" KE 

•550 0PEN3,4 GB 

•560 FP$=CHR$(13):TFFPTHENFP$=CHR$(27)+CH 
R$(10)+CHR$(12) CO 



• 570 IFCT>0THENF0RI=1T0CT : PRINT#3 , CHR$ ( CD 
(I));:NEXT LO 

580 IFGR=1THENPRINT#3,CHR$(8); FE 

590 FS=0:FORI=40T0120STEP40:y=(I-40)/40* 
32 : IFL>=ITHENX=40 : ELSEX=40-( I-L) DP 
600 IFI>LANDL>40THEN670 HH 

610 FORC=1TOX*8:FORJ=1TOPW:FORR=HT01STEP 
-1 HJ 

620 GETA$:IFA$<>""THEN690 GF 

630 L0CATEC-1,R+31+Y:A$=" ":IFGRTHENA$=G 
0$ DM 

640 IFRD0T(2)=0THENA$=CH$:IFGRTHENA$=G1$ KD 
650 F0RK=1T0PH : PRINT#3 , A$ ; : NEXTK , R : IFGRT 
HENPRINT#3:ELSEPRINT#3,FP$; IH 

660 NEXTJ.C.I FI 

670 SL0W:IFGRTHENPRINT#3,CHR$(15); IK 
680 PRINT#3: CLOSES :GOT0940 OC 

690 IFA$=" "THEN670:ELSEIFA$<>"F"THEN630BP 
700 IFFSTHENSL0W:FS=0:ELSEFAST:FS=1 DB 
710 G0T0630 OP 

720 COLORl, 16:CHAR1, 0,17, "PRINT USING SO 
LID BLOCKS (Y/N):":N=0:MX=1:X=32:Y=17:G0 
SUBIOOO KC 

•730 CHAR1,0,17,BL$:GR=0:MW=80:IFZ$="Y"TH 
ENGR=1:MW=70:G0T0760 OK 

•740 CHAR 1,0, 17, "ENTER CHARACTER TO DRAW 
TEXT:":MX=l:X=29:GOSUB 1000:CH$=Z$ NK 

•750 CHAR1,0,17,BL$:CHAR 1,0, 17, "USE FINE 
LINE SPACING (Y/N) :":N=0:MX=1:X=29:Y=17 
:GOSUB1000:FP=0: IFZ$="Y"THENFP=1 OL 

•760 CHARl.O, 17, BL$:CHAR1, 0,17, "EXPAND TO 
FIT FULL WIDTH OF PAGE(y/N) :":N=0:MX=1: 
X=38:G0SUB1000 JK 

• 770 CH ARl , , 1 7 , BL$ : IFZ$="Y"THENPH=INT(MW 
/H):G0T0800 EE 

•780 CHAR1,0,17,"PIXEL HEIGHT(l-"+STR$(IN 
T(MW/H))+"):":N=1:MX=2:X=21:GOSUB1000:IF 
Z<10RZ>INT(MW/H)THEN780 EP 

•790 PH=Z:CHAR1,0,17,BL$ MJ 

•800 CHARl, 0,17, "PIXEL WIDTH (1-10):":N=1 
:MX=2:X=20:G0SUB 1000:IFZ<10RZ>10THEN800 KL 

•810 PW=Z:CHAR1,0,17,BL$ OE 

•820 CT=1 KI 

•830 CHARl, 0, 17, BL$:CHAR1, 0,17, "SPECIAL P 
RINTER CODE (0=DONE) :":N=1:MX=3:X=31:G0S 
UBIOOO EF 

• 840 IFZ=0THEN940 : ELSECD(CT) =Z : CT=CT+1 : IF 
CT<21THEN830:ELSE940 ED 

•850 CHAR 1,0, 17, "UPPER OR LOWER SET (U/L) 
:":MX=l:N=0:X=27:y=17:G0SUB 1000:IFZS=" 
U"THENP$=CHR$(142):ELSEIFZ$="L"THENP$=CH 
R$(14) CN 

•860 G0T0940 IG 

•870 CHARl, 0,17, "FILENAME TO L0AD:":MX=12 
:N=0:X=17:Y=17:G0SUB1000:IFZ$=""THEN940 EP 

•880 BL0AD(Z$+".BNR") :L=PEEK(9463):H=PEEK 
(9471):P0KE9463,0:P0KE9471,0:G0T0940 OF 

•890 CHAR 1,0, 17, "FILENAME TO SAVE AS:":M 
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X=12:N=0:X=20:Y=17:GOSUB1000;IFZ$=""THEN 
940 BO 

• 900 P0KE9463 , L : P0KE9471 , H : SCRATCH( Z$+" . B 
NR") :BSAVE(Z$+".BNR") ,B0.P9A63T0P12992:P 
0KE9463 , : P0KE9471 , : GOSUB940 : GOT0940 ID 

•910 A$="EXIT TO BASIC: ":GOSUB92O:IFR=0TH 
EN130 : ELSEGRAPHICO , 1 : COLORO , CO : C0L0R4 , C4 
:C0L0R5 , C5 : SPRITEl , : SPRITE2 , : SPRITES , 
:END EM 

•920 R=0:CHAR1,0,17,A$+" ARE YOU SURE? ( 
Y/N) :":MX=l:N-0:X=24+LEN(A$):Y=17:GOSUB 
1000 : CHARl , , I 7 , BL$ : IFZ$="Y"THENR=1 JB 

•930 RETURN DD 

•940 CHAR1,0,17,BL$:G0T0130 OK 

• 950 COLORl , 1 3 : BOX 1 , X*8-l , Y*8-2 , X*8+LEN ( A 
$)*8+2,Y*8+8 EE 

•960 COLORl ,C : CHARl, X,Y,A$,1: COLORl, 2: RET 
URN NJ 

•970 A$=" DRAW [BACKARROW]":X=X(0) :Y=Y(0) 
:C=C(0):GOSUB950:DR=1:A$=" TEXT ":X=X(1 
) : Y=Y( 1 ) : C=C( 1 ) : G0SUB950 : RETURN DE 

•980 A$=" TEXT tBACKARROW]":X=X(l):Y=Y(l) 
:C=C(1):G0SUB950:DR=0:A$=" DRAW ":X=X(0 
):Y=Y(0) :C=C(0): GOSUB950: RETURN BD 

•990 F0RI=17T024:CHAR1,0,I,BL$:NEXT:C0L0R 
1,13: BOXl , 1 , 144 , 319, 198: FORI=OTOI1 : A$=B$ 
(I):X=X(I):Y=Y(I):C=C(I):G0SUB950:NEXT:R 
ETURN OH 

1000 Z$="":NC=0:CHARl,X,Y,LEFr$(BL$,40-X 
) FM 

1010 GETA$ : IFA$=" "THENCH ARl , X+NC , Y , " [ BAG 
KARROW]" PB 

1020 IFA$=CHR$(13)THENCHAR1,X+NG,Y," ":Z 
=VAL(Z$): RETURN EL 

1030 IFA$=CHR$(20)ANDNC>r/rHENZ$=LEFr$(Z$ 
,LEN(Z$)-1) : CHARl, X+NC, Y," ":NC=NC-1:G0T 
01010 JI 

1040 IF(A$<" "0R(NAND(A$<"0"0RA$>"9"))0R 
LEN(Z$)=MX)THEH 1010 AP 

1050 Z$=Z$+A$: CHARl, X+NC, Y,A$:NC=NC+1: GO 
TOlOlO EO 

1060 COLORl, 2 :F0RI=4T017: CHARl, 0, I, BL$:N 
EXT HI 

1070 IFL<41THENZ=L:ELSEZ=40 HA 

1080 F0RI=1T0H : DRAWl , , I+31T0Z*8 , 1+31 : NE 
XT OA 

1090 IFL<41THENRETURN:ELSEIFL<81THENZ=L: 
ELSEZ=80 PB 

1 100 Z=L-40 : F0RI=1T0H : DRAWl , , I+63T0Z*8 , 
1+63: NEXT OE 

1110 IFL<81THENRETURN I J 

1 120 Z=L-80 : F0RI=1T0H : DRAWl , , I+95T0Z*8 , 
1+95: NEXT: RETURN JH 

1130 FAST:CO=RCLR(0) :C4=RCLR(4):C5=RCLR( 
5):TRAP20:DIM S$(23),B$(11) ,C(11),X(11) , 
Y(11),TX(11),TY(11),BX(11),BY(113,CD(20) PI 
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• 1 140 COL0R4 , 1 : COLORO , 1 : COLOR 1,13: GRAPHIC 
1,1: F0RI=3584T03775 : READJ : POKEI , J : NEXT OC 

•1150 SPRITEl . 1 , 16:M0VSPR1 , 180, 200:CX=180 
:CY=200:SPRITE2,0 AC 

•1160 F0RI=0T011:READB$(I),C(I),X(I),Y(I) 
:TX(I)=X(I)*8+20:TY(I)=Y(I)*8+47:BX(I)=T 
X(I)+LEN(B$(I))*8+9:BY(I)=TY(I)+14:NEXT HJ 

•1170 F0RI=1T07:G0$=G0$+CHR$(128):G1$=G1$ 
+CHR$(255):READXX(I),YY(I):NEXT:READXX(I 
),YY(I) GM 

• 1 1 80 MW=80 : PW= 1 : PH= 1 : FP=0 : EX= 1 : GR=0 : CH $= 
"0":CT=0:L=40:H=8 10 

1190 BL$="[40" "]":Q$=CHR$(34) KN 
1 200 F0RI=0T02 : CHARl , , I , BL$ , 1 : NEXT : BOXO 
,5, 2, 314, 21: CHARl, 14,1, "BANNER PRINT", 1 GM 
1210 G0SUB990:GOSUB970:GOSUB1060:P$=CHR$ 
(142): SLOW :G0T0130 JO 

1220 DATA 255,0,0,254,0,0,252,0 NN 
1230 DATA 0,254,0,0,223,0,0,135 00 
1240 DATA 128,0,3,192,0,1,224,0 JI 
1250 DATA 0,192,0,0,0,0,0,0 FF 

1260 DATA 0,0,0,0,0,0,0,0 BK 

1270 DATA 0,0,0,0,0,0,0,0 EA 

1280 DATA 0,0,0,0,0,0,0,0 EJ 

1290 DATA 0,0,0,0,0,0,0,0 DH 

1300 DATA 255,0,0,129,0,0,129,0 EK 
1310 DATA 0,129,0,0,129,0,0,129 JO 
1320 DATA 0,0,129,0,0,255,0,0 ID 

1330 DATA 0,0,0,0,0,0,0,0 FP 

1340 DATA 0,0,0,0,0,0,0,0 IF 

1350 DATA 0,0,0,0,0,0,0,0 HD 

1360 DATA 0,0,0,0,0,0,0,0 HJ 

1370 DATA 0,0,0,0,0,0,0,0 KH 

1380 DATA 255,255,255,128,0,1,128,0 JN 
1390 DATA 1,128,0,1,128,0,1,128 HO 
1400 DATA 0,1,128,0,1,128,0,1 MA 

1410 DATA 128,0,1,128,0.1,128,0 CB 
1420 DATA 1,128,0,1,128,0,1,255 NB 
1430 DATA 255,255,0,0,0,0,0,0 JP 

1440 DATA 0,0,0,0,0,0,0,0 OJ 

1450 DATA 0,0,0,0,0,0,0,0 NH 

1460 DATA " DRAW ",3,1,19," TEXT ",3,1 
,21, " ERASE ",3,1,23 EC 

1470 DATA " LENGTH ",6,10,19," HEIGHT 
",6,10,21," MAGNIFY ",6,10,23 NO 

1480 DATA " PRINT[3" "]",7.21,19," OPTIO 
NS ",7,21,21," CHR SET ",7,21.23 JJ 
1490 DATA " LOAD ",8,33,19." SAVE ",8,33 
,21," QUIT ",8,33,23 FD 

1500 DATA 0,-1,1,-1,1,0,1,1,0,1,-1,1,-1, 
0,-1,-1 EG 

STOP TYPINGf ^ 

All the programs in this issue are available 
on disk! See page 30. i 



ROUTE 64 

FROM PACE 13 



•10 REM *** ROUTE 64 *** BUCK CHILDRESS * 
** JG 

•20 REM *** P.O. BOX 13575 SALEM, OR 9730 

9 *** Q^ 

•30 PRINTCHR$ (147) "LOADING" ;:J=52000 AP 
• 40 PRINT" . " ; : F0RB=0T01 1 : READA EA 

'50 IFA<00RA>255THEN70 EP 

• 60 POKEJ+B , A : X=X+A : D=D+1 : NEXTB : READA ; IFA 
=XTHEN80 GO 

•70 PRINT: PRINT :PRINT"ERR0R IN DATA LINE: 
"PEEK(64)*256+PEEK(63):END HB 

•80 X=0:J=J+12:IFD<840THEN40 QL 

•90 PRINT: PRINT :PRINT"THE DATA IS OK [3"." 
]":PRINT LH 

•100 PRINT"SYS 52[3"0"] TO ACTIVATEfS"."] 
":END NN 

•110 DATA169,0,U1,102,206,165,43,166,44, 
133.251,133,1553 GI 

•120 DATA253, 134, 252, 134.254,32, 225, 255, 2 
40,71,32.208,2090 ID 

• 130 DATA205 , 140 , 103 , 206 , 140, 104 , 206 , 140 , 
105.206,140,106,1801 GO 

• 140 DATA206 , 140 , 108 , 206 ,32,163, 205 . 208 , 4 
9,173,102,206,1798 FA 

•150 DATA208, 43, 238, 102, 206, 169, 38, 160, 20 
6,32,30,171,1603 CP 

•160 DATA169, 0,133, 198, 133, 204, 165, 203, 20 
1,63,240,11,1720 KM 

• 1 70 DATA201 , 25 , 240 , 4 , 201 , 39 , 208 , 242 , 32 , 2 
10,255,133,1790 JD 

•180 DATA204, 162, 0,1 34, 207, 201, 25, 240, 168 
,96,32,171,1640 DJ 

•190 DATA205, 177, 251, 170, 32, 171, 205. 177, 2 
51,32,205,189,2065 OP 

•200 DATA169, 32, 32, 210, 255, 173, 102, 206, 24 
0,10,32,163,1624 NP 

•210 DATA205,2Ol,39,24O,50,76,5,204,32,16 
3,205,240,1660 GO 

•220 DATA91,142, 109,206,72,32,77,205, 104, 
166,212,208,1624 EH 

•230 DATA239,201,39,240,18,201,137,240,8, 
201,141,240,1905 CJ 

•240 DATA4, 201, 167, 208, 223, 141, 108, 206, 76 
,160,203,174,1871 FC 

•250 DATA108, 206, 240,212, 141, 104, 206, 141, 
109,206,141,112,1926 MO 

•260 DATA206, 169, 0,141, 99, 206, 32, 163, 205, 
208,3,76,1508 CK 

•270 DATA104. 204, 201, 34, 240, 249, 32, 77, 205 
,174,105,206,1831 AH 

•280 DATA208, 24 1,201, 39, 208, 232, 142, 104, 2 
06,173,102.206,2062 LG 

•290 DATA208, 58, 141, 107, 206, 76, 136, 204, 17 
3,106,206,208.1829 DN 



•300 DATA23, 173, 103, 206, 240, 7, 165. 253, 166 
,254,76,41,1707 u 

•310 DATA203, 160, 1,177, 253, 170, 136, 177, 25 
3,76,41,203,1850 ia 

•320 DATA165,214,201,2,144,35,201.3.176,4 
,165,211,1521 HI 

•330 DATA240, 27, 169, 2 1,160, 206, 32, 30, 171, 
76,128,204,1464 la 

• 340 DATA32 , 1 78 , 205 , 32 , 163 , 205 , 240 , 6 , 32 , 7 
1,205,76,1445 bN 

•350 DATA69, 204, 238, 103, 206, 169,222,160,2 
05.32,30,171,1809 EH 

•360 DATA169, 204, 162, 5,32, 205, 189, 169, 19, 
162,13,160,1489 bL 

•370 DATA4, 141, 119, 2. 142, 120, 2, 142. 121, 2, 
142,122,1059 pp 

•380 DATA2, 132, 198,96, 32,49, 205, 169, 227.1 
60,205,32,1507 pC 

•390 DATA30.171, 169,10,160,206,32,30, 171, 
169,112,160,1420 po 

•400 DATA206,32,30,171,169,13,32.210,255, 
76,210,255,1659 cP 

•410 DATA165,43.166,44,133,63,134,64,160, 
0,177,63,1212 AD 

•420 DATA133, 65, 200, 177, 63, 133,66,162,255 
,160,3,142,1559 gI 

• 430 DATAIOO , 206 , 140 , 101 , 206 , 238 , 100 , 206 , 
238,101.206,172,2014 pg 

•440 DATAlOl, 206, 177, 63, 201, 128, 144, 40, 56 
,233,127,170,1646 nB 

•450 DATA160, 255. 202, 240, 8, 200, 185, 158, 16 
0,16,250,48,1882 hD 

•460 DATA245, 200. 185, 158. 160,48. 14, 174, 10 
0,206,221,112,1823 eE 

•470 DATA206, 208, 17, 238, 100, 206, 76, 197, 20 
4,56,233,128,1869 DO 

•480 DATA174, 100, 206. 221. 112, 206, 240, 21,1 
65.65,166,66,1742 dJ 

•490 DATA208, 162. 173, 107, 206, 208, 51, 32, 49 
,205.169,253,1823 hH 

• 500 DATAl 60 , 205 , 76 , 1 11 , 204 , 236 , 99 , 206 , 14 
4,167,238,107,1953 nE 

■ 510 DATA206, 173, 107, 206,201 ,2, 176, 16, 160 
,2,177,63,1489 eB 

•520 DATA141, 110, 206, 200, 177, 63, 141, 111, 2 
06,76,228,204,1863 PE 

•530 DATA32,49,205,169,239,160,205,76.111 
,204.32,178,1660 gK 

•540 DATA205. 173, 111. 206. 174, 110. 206, 32. 2 
05,189,76,160,1847 id 

•550 DATA203, 169, 0,1 74, 99, 206, 14 1,1 09, 206 
.232,157,112,1808 CF 

•560 DATA206, 32, 166,205, 240.96,32, 163,205 
,240,91,32,1708 mD 

•570 DATA77, 205, 76, 66, 205, 166, 21 2. 208, 36, 
201,128,144,1724 im 

•580 DATA32, 56, 233, 127, 170. 160, 255, 202, 24 
0,8,200,185,1868 fB 
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590 DATAl 58, 160, 16, 250,48, 245, 200, 185, 15 
8,160,48,6,1634 JL 

600 DATA32, 117, 205, 76, 102, 205, 56, 233, 128 
,174,109,206,1643 DN 

610 DATA240,9,238,99,206,174,99,206,157, 
112,206,32,1778 JN 

620 DATA210, 255, 174, 104, 206, 240, 23, 201, 3 
9,240,19,201,1912 CD 

630 DAT A48, 144, 12, 201, 58, 144, 11, 201, 65,1 
44,4,201,1233 GJ 

640 DATA91, 144, 3, 141, 105, 206, 96, 32, 171, 2 
05,162,0,1356 KJ 

650 DATA 161, 251, 96, 230, 251, 208, 2. 230, 252 
,96,169,20,1966 ED 

660 DATA141, 106, 206, 174, 99, 206, 32, 210, 25 
5,202,16,250,1897 IF 

670 DATA173, 102 , 206,240, 236, 160, 1 , 177 , 25 
1,208,230,169,2153 CA 

680 DATA58, 76, 210, 255, 32, 68, 229, 160, 0,13 
2,198,132,1550 AD 

690 DATA199,132,212,132,216,96,13,83,89, 
83,0,13,1268 BJ 

700 DATA13, 18, 69, 82, 82, 79, 82, 32, 73, 78,0, 
13,621 HB 

710 DATA13, 18, 68, 85, 80, 76, 73, 67, 65, 84, 69 
,68,766 KP 

720 DATAO, 13, 13, 18, 85, 78, 68, 69, 70, 73, 78, 
69,634 CI 

730 DATA68, 0,32, 76. 65, 66, 69, 76, 32, 42, 42, 
32,600 EP 

740 DATAO, 13, 13, 18, 76, 73, 78, 69, 32, 84, 79, 
79,614 MK 

750 DATA32, 76, 79, 78, 71, 0,17, 76, 73, 78, 69, 
32,681 HG 

760 DATA82, 69, 70, 69, 82, 69, 78, 67, 69, 83, 32 
,67,837 CA 

770 DATA79, 77, 80, 76, 69, 84, 69, 46, 46, 46, 13 
,13,698 HN 

780 DATA82, 69, 77, 79, 86, 69, 32, 69, 88, 73, 83 
,84,891 GE 

790 DATA73, 78, 71, 32, 76, 65, 66, 69, 76, 83, 63 
,32,784 GF 

800 DATA40, 89, 47, 78, 41, 32, 0,0, 0,0, 0,0, 32 
7 PJ 

STEEPLECHASE 

FROM PACE 15 

Starting address in hex: COOO 
Ending address in hex: USO 
SYS to start: 49152 

Flankspeed required for entry! See page 79. 



COOO: 
C008 : 
CO 10: 
CO 18: 
CO 20: 
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A9 8E 20 D2 FF A9 08 20 FC 

D2 FF A9 7E 85 39 A9 C7 33 

85 3A A9 00 85 3B A9 3C 20 

85 3C A2 OC AO 00 Bl 39 14 

91 3B C8 CO 40 90 F7 18 57 



C028: 


98 


65 


39 


85 


39 


A5 


3A 


69 


67 


C030; 


00 


85 


3A 


18 


98 


65 


3B 


85 


C6 


C038: 


3B 


A5 


3C 


69 


00 


85 


3C 


CA 


4B 


C040: 


DO 


DA 


AO 


18 


B9 


A9 


C5 


99 


67 


C048- 


00 


D4 


88 


10 


F7 


20 


C9 


C4 


5C 


C050- 


AO 


2C 


A9 


00 


99 


19 


C5 


88 


C7 


C058 


10 


FA 


8D 


20 


DO 


8D 


15 


DO 


55 


CO 60' 


8D 


17 


DO 


8D 


IB 


DO 


8D 


ID 


F9 


C068 


DO 


A9 


FF 


8D 


IC 


DO 


A9 


09 


10 


C070- 


8D 


25 


DO 


A9 


OF 


8D 


26 


DO 


31 


C078 


A9 


07 


8D 


27 


DO 


A9 


01 


8D 


E6 


C080 


28 


DO 


20 


25 


C4 


A9 


92 


AO 


60 


C088 


C6 


20 


IE 


AB 


A2 


06 


AO 


00 


82 


CO 90 


18 


20 


FO 


FF 


A9 


C2 


AO 


C5 


8C 


C098 


20 


IE 


AB 


A2 


12 


AO 


00 


18 


EF 


COAO 


20 


FO 


FF 


A9 


C2 


AO 


C5 


20 


A4 


CO A 8 


: IE 


AB 


AO 


27 


A9 


AO 


99 


AO 


BE 


CO BO 


04 


99 


EO 


05 


99 


80 


06 


99 


ED 


C0B8 


: CO 


07 


A9 


00 


99 


AO 


D8 


99 


D6 


COCO 


. 80 


DA 


A9 


05 


99 


EO 


D9 


99 


B8 


C0C8 


: CO 


DB 


88 


10 


DF 


A2 


02 


AO 


23 


CODO 


: 03 


18 


20 


FO 


FF 


A9 


6B 


AO 


B2 


CODS 


: C6 


20 


IE 


AB 


A2 


OE 


AO 


03 


DD 


COEO 


: 18 


20 


FO 


FF 


A9 


6B 


AO 


C6 


86 


C0E8 


: 20 


IE 


AB 


18 


AD 


19 


C5 


AA 


22 


COFO 


: 69 


31 


8D 


17 


04 


8A 


OA 


OA 


D2 


C0F8 


: OA 


AA 


AO 


00 


BD 


46 


C5 


99 


Bl 


CI 00 


: 20 


04 


E8 


C8 


CO 


07 


90 


F4 


23 


CI 08 


: AO 


7F 


AD 


IB 


D4 


99 


00 


3F 


9E 


CI 10 


: 88 


10 


F7 


A9 


7D 


8D 


2E 


C5 


49 


C118 


: A9 


DD 


8D 


2F 


C5 


A2 


02 


BD 


84 


CI 20 


. 86 


C5 


9D 


38 


C5 


9D 


3B 


C5 


A6 


C128 


: AD 


IB 


D4 


29 


FE 


9D 


40 


C5 


91 


CI 30 


: 9D 


43 


C5 


CA 


10 


E9 


20 


DE 


9A 


C138 


: C2 


A9 


FF 


8D 


24 


C5 


8D 


25 


CE 


CI 40 


C5 


8D 


15 


DO 


A2 


00 


8E 


36 


EO 


C148 


; C5 


8E 


37 


C5 


8A 


29 


OF 


4A 


A6 


CI 50 


4A 


A8 


09 


FO 


8D 


F8 


07 


8D 


58 


C158 


: F9 


07 


A9 


10 


8D 


04 


D4 


B9 


33 


C160 


A5 


C5 


FO 


08 


8D 


01 


D4 


A9 


Dl 


C168 


11 


8D 


04 


D4 


A9 


2 


20 


CI 


6D 


CI 70 


C4 


8A 


48 


20 


DE 


C2 


68 


AA 


DC 


C178 


: E8 


EO 


64 


90 


C9 


A9 


20 


8D 


58 


CI 80 


08 


D4 


A2 


80 


8E 


OB 


D4 


E8 


D7 


C188 


: 8E 


OB 


D4 


20 


9A 


C2 


A9 


01 


IF 


CI 90 


85 


04 


A 6 


04 


BD 


24 


C5 


C9 


36 


C198 


: 08 


90 


OD 


BD 


00 


DC 


29 


10 


12 


ClAO 


DO 


OC 


9D 


22 


C5 


9D 


24 


C5 


8A 


C1A8 


: 20 


09 


C3 


4C 


Dl 


CI 


BD 


00 


33 


CI BO 


DC 


29 


OC 


4A 


4A 


A8 


18 


BD 


D5 


C1B8 


: lA 


C5 


79 


66 


C5 


85 


02 


BD 


83 


CI CO 


IC 


05 


79 


6A 


C5 


C9 


2F 


BO 


F5 


C1C8 


: 08 


9D 


IC 


C5 


A5 


02 


9D 


lA 


AF 


CI DO 


C5 


BD 


20 


C5 


FO 


06 


DE 


20 


30 


C1D8 


C5 


4C 


42 


C2 


38 


A9 


32 


FD 


02 


ClEO 


IC 


C5 


9D 


20 


C5 


C9 


32 


FO 


33 


C1E8 


2E 


FE 


IE 


C5 


BD 


IE 


C5 


29 


C4 


CIFO 


OF 


DO 


05 


20 


58 


C2 


A6 


04 


BB 



C1F8: 


BD IE C5 29 7F DO 13 BD E4 


C3C8: 


4A 


A8 


B9 


00 


3F 


85 


03 29 66 


C200: 


6E C5 BC 70 C5 20 6E C3 79 


C3D0: 


03 


A8 


09 


F8 


9D 


FA 


07 B9 D7 


C208: 


CD 17 04 90 03 4C 6D C4 03 


C3D8: 


97 


C5 


9D 


29 


DO 


AD 


ID DO 69 


C210: 


A6 04 20 A3 C3 A6 04 BD AA 


C3E0: 


3D 


80 


C5 


A4 


03 


30 


03 ID 5C 


C218: 


24 C5 C9 08 90 24 BD IE 64 


C3E8: 


78 


C5 


8D 


ID 


DO 


BC 


9B C5 CO 


C220: 


C5 29 IF 4A 4A 4A A8 09 BE 


C3F0: 


A5 


03 


29 


40 


DO 


01 


A8 98 16 


C228: 


FO DD F8 07 FO 14 9D F8 92 


C3F8: 


9D 


30 


C5 


E8 


C6 


02 


DO AD BC 


C230: 


07 A2 10 8E 04 D4 B9 A5 BO 


C400: 


60 


AD 


IE 


DO 


29 


03 


Ajr ^ 4 4 A«r ^J %^ 

FO IC 36 


C238: 


C5 FO 07 8D 01 D4 E8 8E DO 


C408: 


85 


02 


A2 


00 


46 


02 


90 OF lA 


C240: 


04 D4 C6 04 30 03 4C 92 F5 


C410: 


A9 


OA 


DD 


IG 


C5 


BO 


08 9D D9 


C248: 


CI 20 A5 C2 20 DE C2 20 74 


C418: 


IC 


C5 


A9 


00 


9D 


lA 


C5 E8 OA 


C2 50: 


01 C4 20 2F C3 4C 8E CI C5 


C420: 


EO 


02 


90 


E8 


60 


A9 


93 20 3A 


C258: 


8A OA A8 38 B9 2B C5 E9 62 


C428: 


D2 


FF 


E6 


02 


A5 


02 


8D 86 9F 


C260: 


01 29 07 99 2B C5 C9 07 EC 


C430: 


02 


A9 


CI 


AO 


C6 


20 


IE AB EE 


C268: 


DO 2F BD 72 G5 85 3B BD DC 


C438: 


AD 


00 


DC 


29 


OC 


4A 


4A A8 35 


C270: 


74 C5 85 3C A 2 06 AO 00 B5 


C440: 


18 


AD 


19 


C5 


79 


Al 


C5 C9 8F 


C278: 


Bl 3B 48 C8 Bl 3B 88 91 7D 


C448: 


03 


BO 


03 


8D 


19 


C5 


AD 19 32 


C280: 


3B C8 CO 27 DO F5 68 91 2D 


C450: 


C5 


OA 


A8 


A9 


01 


99 


OE D9 F4 


C288: 


3B 18 A5 3B 69 28 85 3B OF 


C458: 


A9 


03 


20 


CI 


C4 


AD 


00 DC 36 


C290: 


A5 3C 69 00 85 3C CA DO 39 


C460: 


29 


10 


DO 


C6 


A9 


OE 


8D 27 9D 


C298: 


DD 60 AO 02 A9 00 99 08 C4 


C468: 


C5 


8D 


29 


C5 


60 


AO 


00 A 5 51 


C2A0: 


DC 88 10 FA 60 AD OA DC 06 


C470: 


04 


OA 


AA 


98 


29 


03 


9D 27 B2 


C2A8: 


AA 29 FO 4A 4A 4A 4A 09 9F 


C478: 


C5 


OA 


09 


19 


8D 


08 


D4 A2 77 


C2B0: 


30 8D 06 04 8A 29 OF 09 44 


C480: 


10 


8E 


OB 


D4 


E8 


8E 


OB D4 56 


C2B8: 


30 8D 07 04 AD 09 DC AA BF 


C488: 


A9 


09 


20 


CI 


C4 


C8 


CO 14 7F 


C2C0: 


29 FO 4A 4A 4A 4A 09 30 3D 


C490: 


90 


DD 


AO 


00 


B9 


20 


04 D9 57 


C2C8: 


8D 09 04 8A 29 OF 09 30 5F 


C498: 


06 


04 


FO 


05 


BO 


OB 


4C 50 FO 


C2D0: 


8D OA 04 AD 08 DC 29 OF 37 


C4A0: 


CO 


C8 


CO 


07 


90 


EE 


4C 50 OE 


C2D8: 


09 30 8D OC 04 60 A 2 07 B9 


C4A8: 


CO 


AD 


19 


C5 


OA 


OA 


OA AA BE 


C2E0: 


8A OA A8 BD 2E C5 99 01 6A 


C4B0: 


AO 


00 


B9 


06 


04 


9D 


46 C5 BE 


C2E8: 


DO BD 36 C5 99 00 DO AD 8B 


C4B8: 


E8 


C8 


CO 


07 


90 


F4 


4C 50 54 


C2F0: 


10 DO 3D 7E C5 A8 BD 3E F7 


C4C0: 


CO 


18 


65 


A2 


C5 


A2 


DO FC D7 


C2F8: 


C5 29 01 FO 05 98 ID 76 OB 


C4C8: 


60 


78 


A9 


7F 


8D 


OD 


DC A9 EB 


C300: 


C5 A8 8C 10 DO CA 10 D8 8F 


C4D0: 


01 


8D 


lA 


DO 


8D 


12 


DO A9 64 


C308: 


60 BC 24 C5 38 BD 91 C5 5C 


C4D8: 


IB 


8D 


11 


DO 


A9 


E8 


8D 14 97 


C310: 


F9 89 C5 9D 2E C5 98 4A CD 


C4E0: 


03 


A9 


C4 


8D 


15 


03 


58 60 BO 


C313: 


09 F4 9D F8 07 18 BD 22 AB 


C4E8: 


A9 


01 


8D 


19 


DO 


AO 


03 AD 5C 


C3 20: 


C5 69 04 9D 22 C5 BD 24 BA 


C4F0: 


12 


DO 


D9 


5E 


C5 


BO 


03 88 OE 


C328: 


C5 69 00 9D 24 C5 60 AD EC 


C4F8: 


DO 


F8 


B9 


26 


C5 


8D 


21 DO E7 


C330: 


IC C5 A2 69 AO 04 20 40 23 


C500: 


B9 


2A 


C5 


8D 


16 


DO 


B9 62 3A 


C338: 


C3 AD ID C5 A 2 49 AO 06 IF 


C508: 


C5 


8D 


12 


DO 


AD 


OD 


DC 29 FE 


C3A0: 


86 3B 84 3C A8 4A 4A 85 85 


C510: 


01 


FO 


03 


4C 


31 


EA 


4C BC 76 


C348: 


02 98 29 03 AA AO 00 C4 IF 


C518: 


FE 


00 


00 


00 


00 


00 


00 00 17 


C350: 


02 FO 08 A9 AO 91 3B C8 2B 


C520: 


00 


00 


00 


00 


00 


00 


00 00 20 


C358: 


4C 4F C3 BD 93 C5 91 3B 98 


C528: 


00 


00 


00 


00 


00 


00 


00 00 28 


C360: 


A9 20 C8 CO OC BO 06 91 08 


C530: 


00 


00 


00 


00 


00 


00 


00 00 30 


C368t 


3B C8 4C 63 C3 60 85 3B 01 


C538: 


00 


00 


00 


00 


00 


00 


00 00 38 


C370: 


84 3C AO 03 Bl 3B 85 02 49 


C540: 


00 


00 


00 


00 


00 


00 


64 64 09 


C378: 


88 Bl 3B AA AO 00 Bl 3B 26 


C548: 


3A 


64 


64 


3A 


64 


00 


64 64 B2 


C380: 


A4 02 C8 CO 3A 90 OC AO 28 


C550: 


3A 


64 


64 


3A 


64 


00 


64 64 BA 


C388: 


30 E8 EO 3A 90 05 A2 30 25 


C558: 


3A 


64 


64 


3A 


64 


00 


00 5 3 4D 


C390: 


18 69 01 48 98 AO 03 91 29 


C560: 


92 


B5 


53 


92 


B5 


00 


FD OA 4C 


C398: 


3B 88 8A 91 3B 68 AO 00 BC 


C568: 


FO 


FD 


FF 


00 


FF 


FF 


5C 3C EF 


C3A0: 


91 3B 60 8A OA 18 65 04 E3 


C570: 


04 


06 


FO 


DO 


04 


06 


01 02 49 


C3A8: 


AA A9 03 85 02 BD 38 C5 43 


C578: 


04 


08 


10 


20 


40 


80 


FE FD 72 


C3B0: 


DO 03 DE 40 C5 DE 38 C5 46 


C580: 


FB 


F7 


EF 


DF 


BF 


7F 


00 90 14 


C3B8: 


BD 38 C5 C9 50 DO 3C BD 59 


C588: 


FF 


03 


07 


OA 


OC 


OA 


07 03 BC 


C3C0: 


40 C5 A8 29 01 FO 34 98 57 


C590: 


00 


7D 


DD 


20 


65 


61 


E7 05 BF 
AHOV. 8 



C598: 


oc 


00 


05 


84 


84 


84 


E4 


E4 


01 


0768: 


20 


20 


20 


10 


50 


52 


45 


53 


20 


C5A0; 


E4 


00 


01 


FF 


00 


04 


08 


00 


92 


0770; 


53 


20 


46 


49 


52 


45 


20 


42 


6D 


C5A8: 


04 


00 


00 


00 


00 


00 


01 


00 


AD 


0778: 


55 


54 


54 


4F 


4E 


00 


00 


00 


14 


C5B0: 


00 


00 


00 


00 


00 


19 


09 


FF 


D2 


0780; 


00 


00 


00 


00 


00 


00 


00 


00 


80 


C5B8: 


FF 


00 


00 


80 


00 


00 


00 


00 


39 


0788: 


00 


00 


00 


00 


00 


00 


04 


00 


80 


C5C0: 


00 


8F 


05 


20 


20 


20 


A4 


AF 


OA 


0790: 


00 


05 


00 


00 


00 


00 


00 


14 


B5 


C5C8' 


B9 


A2 


B9 


AF 


A4 


20 


20 


20 


93 


0798: 


00 


00 


50 


10 


00 


D4 


68 


01 


37 


C5D0: 


20 


20 


20 


20 


20 


20 


20 


20 


Dl 


C7A0: 


Fl 


A9 


09 


7E 


66 


6A 


5D 


92 


84 


C5D8: 


20 


A4 


AF 


B9 


A2 


AF 


A4 


20 


IE 


C7AS' 


6A 


9E 


40 


6A 


65 


80 


29 


56 


01 


C5E0: 


20 


20 


20 


20 


20 


20 


20 


20 


El 


07B0: 


90 


29 


00 


90 


24 


00 


24 


84 


07 


C5E8' 


20 


20 


OD 


20 


20 


A3 


B7 


B8 


8A 


C7B8" 


00 


20 


80 


00 


08 


26 


00 


00 


87 


CSFO; 


B7 


B8 


B7 


A3 


20 


20 


A4 


AF 


51 


0700- 


00 


00 


00 


00 


00 


00 


00 


00 


00 


C5F8 


B9 


A2 


B9 


AF 


A4 


20 


20 


20 


03 


0708 


00 


00 


00 


04 


00 


00 


05 


00 


Dl 


C600- 


A3 


B7 


B8 


B8 


B7 


A3 


20 


20 


68 


07 DO: 


00 


00 


00 


00 


14 


10 


00 


50 


51 


C608 


20 


20 


A4 


AF 


B9 


A2 


B9 


AF 


62 


07D8 


68 


00 


D5 


A9 


01 


FD 


A6 


09 


6F 


C610- 


A4 


20 


OD 


20 


20 


20 


20 


20 


82 


07E0- 


5E 


52 


6A 


5D 


80 


6A 


95 


40 


lA 


C618 


20 


20 


20 


20 


20 


20 


A3 


B7 


34 


07E8 


6A 


66 


80 


29 


56 


90 


09 


00 


53 


C620 


B8 


B7 


A3 


B7 


A3 


20 


20 


20 


EF 


07 FO 


90 


08 


00 


90 


09 


01 


80 


02 


A6 


C628 


• 20 


20 


20 


20 


20 


20 


20 


20 


29 


C7F8 


02 


00 


00 


00 


00 


26 


00 


00 


21 


C630 


20 


20 


20 


20 


A3 


B7 


B8 


B8 


7D 


0800 


00 


00 


00 


00 


00 


00 


00 


00 


00 


C638 


: B7 


A3 


OD 


OD 


OD 


9C 


A4 


AF 


AB 


C803 


04 


00 


00 


05 


00 


00 


00 


00 


ID 


C640 


B9 


A2 


12 


B8 


B7 


A3 


20 


B7 


9A 


C810 


■ 00 


14 


10 


00 


50 


68 


00 


D5 


02 


C648 


: B8 


92 


B9 


AF 


A4 


AF 


B9 


A2 


AD 


0818 


: A9 


00 


Fl 


A6 


01 


3E 


52 


09 


F4 


C650 


B9 


AF 


A4 


20 


20 


A4 


AF 


B9 


AC 


C820 


5D 


80 


6A 


5E 


40 


6A 


95 


80 


87 


C658 


: A2 


12 


B8 


B7 


A3 


B7 


B7 


B8 


49 


0828 


• 6A 


66 


80 


69 


56 


40 


09 


02 


84 


C660 


: 92 


B9 


AF 


A4 


2 


A4 


AF 


B9 


2F 


0830 


40 


OA 


02 


00 


02 


48 


00 


00 


06 


C668 


: AF 


A4 


00 


96 


44 


49 


53 


54 


88 


0838 


• 80 


00 


00 


00 


00 


26 


00 


00 


DE 


C670 


: 41 


4E 


43 


45 


20 


05 


30 


2E 


00 


0840 


. 00 


00 


00 


00 


00 


00 


00 


00 


40 


C678 


: 30 


30 


20 


20 


20 


9C 


53 


50 


79 


0848 


: 00 


00 


00 


04 


00 


00 


05 


00 


51 


C680 


: 45 


45 


44 


20 


99 


20 


20 


20 


69 


0850 


. 00 


00 


00 


00 


14 


10 


00 


50 


DO 


C688 


: 20 


20 


20 


20 


20 


20 


20 


20 


89 


0853 


: 68 


00 


D5 


A9 


01 


Fl 


A6 


09 


E2 


C690 


. 20 


00 


93 


20 


9A 


54 


49 


4D 


E9 


0860 


7E 


52 


6A 


5D 


80 


6A 


9E 


40 


02 


C698 


: 45 


20 


05 


30 


30 


3A 


30 


30 


FD 


0868 


; 6A 


65 


80 


29 


56 


90 


09 


00 


Dl 


C6A0 


: 3A 


30 


20 


20 


20 


9F 


43 


4F 


9D 


0870 


: 90 


08 


00 


90 


09 


01 


80 


02 


26 


C6A8 


: 55 


52 


53 


45 


20 


05 


20 


20 


4E 


C87S 


: 02 


00 


00 


00 


00 


26 


00 


00 


AO 


C6B0 


: 20 


2 


9E 


42 


45 


53 


54 


20 


DE 


0880 


: 00 


00 


10 


00 


00 


14 


40 


00 


E4 


C6B8 


: 05 


20 


20 


20 


20 


20 


20 


20 


9E 


0888 


: 31 


AO 


00 


51 


A4 


00 


46 


98 


2F 


C6C0 


: 00 


13 


11 


20 


20 


D5 


C3 


C9 


88 


0890 


: 01 


56 


98 


01 


05 


10 


04 


F6 


52 


C6C8 


: BO 


B2 


AE 


B2 


C3 


AE 


B2 


C3 


76 


0898 


: 40 


05 


79 


00 


09 


7A 


00 


2A 


05 


C6D0 


: AE 


B2 


C3 


C9 


B2 


20 


20 


B2 


65 


08 A 


: 56 


40 


6A 


98 


90 


6A 


50 


90 


16 


C6D8 


: C3 


AE 


D5 


C3 


C9 


B2 


20 


B2 


34 


C8A8 


: 6A 


40 


80 


09 


02 


00 


09 


00 


E7 


C6E0 


: D5 


C3 


C9 


D5 


C3 


09 


B2 


03 


IE 


08 BO 


: 00 


09 


00 


00 


08 


40 


00 


02 


04 


C6E8 


: AE 


OD 


20 


20 


CA 


03 


09 


20 


5D 


08B8 


: 00 


00 


00 


00 


00 


00 


00 


04 


BC 


C6F0 


: C2 


20 


AB 


B3 


20 


AB 


B3 


20 


D2 


C8C0 


: 00 


00 


05 


00 


00 


00 


00 


00 


Dl 


C6F8 


: AB 


C3 


CB 


C2 


20 


20 


AB 


B3 


96 


0808 


: 14 


10 


00 


50 


68 


00 


55 


A9 


A4 


C700 


: 20 


C2 


20 


20 


AB 


C3 


B3 


AB 


Fl 


08 DO 


: 00 


Fl 


A6 


01 


3D 


86 


09 


5E 


95 


C708 


: C3 


B3 


CA 


C3 


C9 


AB 


B3 


OD 


44 


C8D8 


: 50 


2A 


5E 


80 


6A 


95 


80 


6A 


ID 


C710 


: 20 


20 


CA 


C3 


CB 


20 


Bl 


20 


90 


O8E0 


: 66 


90 


6A 


52 


10 


09 


02 


10 


BF 


C718 


: Bl 


C3 


BD 


Bl 


C3 


BD 


Bl 


20 


50 


08E8 


: OA 


48 


40 


02 


50 


00 


00 


80 


4E 


C720 


: 20 


Bl 


C3 


BD 


Bl 


03 


BD 


CA 


71 


08F0 


: 00 


00 


00 


00 


00 


00 


00 


00 


FO 


C728 


: C3 


CB 


Bl 


20 


Bl 


Bl 


20 


Bl 


BE 


08F8 


: 00 


00 


00 


00 


00 


26 


00 


10 


2F 


C730 


: CA 


C3 


CB 


Bl 


03 


BD 


OD 


OD 


D7 


0900 


: 00 


00 


14 


00 


00 


30 


00 


00 


44 


C738 


: OD 


IF 


20 


20 


20 


20 


53 


45 


7D 


0908 


: 50 


00 


00 


40 


00 


00 


54 


10 


FC 


C740 


: 4C 


45 


43 


54 


2 


40 


45 


4E 


69 


0910 


: 00 


F4 


68 


01 


7D 


A9 


OA 


5D 


FO 


C748 


: 47 


54 


48 


20 


4F 


46 


20 


43 


45 


0918 


: A6 


6A 


9E 


66 


6A 


A5 


90 


6A 


39 


C750 


: 4F 


55 


52 


53 


45 


20 


20 


28 


48 


0920 


: 66 


80 


OA 


56 


40 


02 


40 


90 


7A 


C758 


: 31 


20 


32 


20 


33 


29 


OD 


OD 


72 


0928 


: 02 


10 


90 


00 


84 


84 


00 


22 


F5 


C760 


: 20 


20 


2 


20 


20 


20 


20 


20 


61 


0930 


: 00 


00 


00 


00 


00 


00 


00 


00 


30 



90 AHOY! 



C938: 


00 00 00 00 00 


26 


00 


00 


5E 


C038: 


8B 86 8C A2 05 AO 00 B9 D8 


C940: 


00 00 00 00 00 


40 


00 


00 


80 


C040: 


02 C5 91 SB C8 CO 19 DO 98 


C948: 


50 00 00 CO 00 


00 


40 


00 


99 


C048: 


F6 20 9D C3 20 AB C3 20 70 


C950: 


01 40 00 01 50 


10 


09 


F4 


FO 


C050: 


AB C3 20 AB C3 AO 00 B9 A9 


C958: 


68 2A 7C A9 6A 


9D 


A6 


6A 


2A 


C058: 


34 C5 91 SB C8 CO 19 DO E2 


C960: 


9E 52 6A 5E 90 


09 


15 


80 


49 


C060: 


F6 20 9D C3 CA DO D6 A9 F4 


C968: 


09 06 40 02 42 


40 


02 


40 


7E 


C068: 


00 85 FB 85 FC A9 7A A2 33 


C970: 


90 00 00 90 00 


00 


24 


00 


B5 


CO 70: 


07 85 FD 86 FE A9 00 8D B7 


C978: 


00 00 00 00 00 


26 


00 


00 


9E 


C078: 


C3 C5 8D C2 C5 8D C3 C5 2F 


C980: 


00 00 00 00 00 


00 


00 


00 


80 


C080: 


8D C4 C5 A9 El A2 CO 8D 15 


C988: 


CB 00 00 3A 20 


03 


AB 


8C 


E9 


C088: 


18 03 8E 19 03 A9 7F 8D 05 


C990: 


02 BA 68 OA A6 


93 


3B 


6A 


9F 


C090: 


OD DD A9 82 8D OD DD A9 C9 


C998: 


60 09 9E 6C 26 


69 


A8 


OE 


53 


C098: 


FF A2 OF 8D 04 DD 8E 05 4D 


C9A0: 


99 98 09 A5 6C 


02 


55 


90 


D8 


COAO: 


DD A9 11 8D OE DD A9 10 6C 


C9A8: 


OE 24 BO 00 00 


00 


00 


00 


8B 


C0A8: 


A2 00 8D 06 DD 8E 07 DD 30 


C9B0: 


00 00 00 00 00 


00 


00 


00 


BO 


CO BO: 


A9 51 8D OF DD A5 91 C9 27 


C9B8: 


00 00 00 00 00 


26 


01 


5 5 


35 


COBS: 


7F DO 06 20 39 CI 4C 66 DC 


C9C0: 


40 03 FB CO 02 


EF 


80 


03 


36 


COCO : 


FE A5 C5 C9 05 DO 06 20 FO 


C9C8: 


BE CO 03 BB 80 


02 


FB 


CO 


46 


C0C8: 


57 CI 4C B5 CO C9 04 DO 43 


C9D0: 


03 AF 80 03 EE 


CO 


02 


BB 


74 


CO DO: 


06 20 7F CI 4C B5 CO C9 C4 


C9D8: 


80 03 EE CO 03 


BE 


CO 


02 


90 


CODS: 


03 DO DA 20 BB C3 4C B5 29 


C9E0: 


ED 80 03 76 CO 


06 


D5 


DO 


36 


COEO: 


CO 48 8A 48 98 48 A9 00 47 


C9E8: 


15 55 54 00 00 


00 


00 


00 


A7 


C0E8: 


8D CO C5 20 3F CI 20 AA E8 


C9F0: 


00 00 00 00 00 


00 


00 


00 


FO 


COFO: 


CI 20 09 C2 20 34 C2 A5 5B 


C9F8: 


00 00 00 00 00 


26 


00 


00 


IF 


C0F8: 


FD 38 E9 C8 85 FD A5 FE OA 


CAOO: 


00 00 00 00 00 


00 


00 


10 


10 


CI 00: 


E9 00 85 FE A5 FB 18 69 91 


CA08: 


00 10 55 55 54 


9A 


AA 


98 


F4 


C108: 


01 85 FB A5 FC 69 00 85 IC 


CAIO: 


10 00 10 10 00 


10 


55 


55 


FA 


CI 10: 


FC EE CO C5 AD CO C5 09 80 


CA18: 


54 9A AA 98 10 


00 


10 


10 


7A 


C118: 


05 DO DO A9 7A A2 07 85 12 


CA20: 


00 10 55 5 5 54 


9A 


AA 


98 


OD 


CI 20: 


FD 86 FE A5 FB 38 E9 05 6C 


GA28: 


10 00 10 00 00 


00 


00 


00 


48 


C128: 


85 FB A5 FC E9 00 85 FC B8 


CA30r 


00 00 00 00 00 


00 


00 


00 


30 


CI 30: 


4C 51 FE A9 82 8D OD DD 71 


CA3S: 


00 00 00 00 00 


26 


00 


00 


5E 


C138: 


60 A9 7F 8D OD DD 60 AO 38 


CA40: 


00 00 00 00 00 


00 


00 


00 


40 


C140: 


00 A5 FC AA 20 09 C2 88 02 


CA48: 


00 00 00 00 00 


00 


00 


00 


48 


C148: 


88 A5 FB AA 20 09 C2 AO A9 


CA50: 


00 00 00 00 00 


00 


00 


00 


50 


C150: 


00 Bl FB A A AO 06 60 20 CF 


CA58: 


00 00 00 00 00 


14 


00 


00 


6C 


C158: 


39 CI 20 4C C2 20 4C C2 Bl 


CA60: 


69 40 01 9 A 90 


16 


B7 


E4 


E8 


CI 60: 


20 4C C2 20 4C C2 20 4C 2B 


CA68: 


6A FD F9 03 F4 


00 


00 


00 


C2 


C168: 


C2 20 44 C3 20 3F CI 20 94 


CA70: 


00 00 00 00 00 


00 


00 


00 


70 


CI 70: 


AA CI 20 09 C2 20 34 C2 DF 


CA78: 


00 00 00 00 00 


26 


00 


00 


9E 


C178: 


20 33 CI 20 DF C4 60 20 D2 


CA80: 


00 80 










CI 80: 


39 CI 20 A5 C2 20 A5 C2 8C 


SCANNER 
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CI 20 AA CI 20 09 C2 20 EA 


FROM PACI 25 
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34 C2 20 68 C3 20 A5 C2 64 
20 A5 C2 20 33 CI 20 DF 3E 
C4 60 8A 29 80 4A 4A 4A EO 


Starting address in liex: COOO 










C1A8: 


Ending address in liei: C588 
SYS to start: 49152 
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C1B8: 


4A 4A 4A 4A 09 BO 91 FD 23 
C8 8A 29 40 4A 4A 4A 4A 9E 


Flanlapeed required for entryl See page 79. 
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4F 
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20 
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C2 
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C2 
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DO 
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61 


C4F8 
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B9 
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C5 


99 


08 


D8 


C8 


CO 
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: 64 
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64 


64 


64 
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2B 
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DO 


EF 


60 


38 


A5 


FB 


E9 


3E 
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: 64 
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64 


64 


64 


64 


64 
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FB 
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FC 


E9 


00 


85 
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64 2 
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AO 


AO 


AO 


AO 
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05 


85 


5B 
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AO 


AO 


AO 
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FC 
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FC 


A9 


8C 
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AO AO 


AO 


AO 


AO 


AO 


AO 


2D 


C360 
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A2 


04 


85 


FD 


86 


FE 


60 


7A 


C530 
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AO AO 


61 


20 


E2 


E2 


E2 


3C 


C368 
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A5 


FB 


E9 


04 


85 


FB 


A5 


57 


C538 


: E2 


E2 E2 


E2 


E2 


E2 


E2 


E2 


4F 
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E9 
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E2 
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FD 


86 


FE 


60 


AO 


00 


89 
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E2 E2 


E2 


7E 


00 


06 


06 


5E 
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00 


91 


8B 


C8 


CO 


19 
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C3 
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B9 
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OE 


OE 


OE 


C8 
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C5 
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CO 
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DO 
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OE 
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OE 


OE 


00 


AO 


AO 


E7 
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: F6 


20 


9D 


C3 
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A5 


8B 


BA 
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AO 


AO 


AO 
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: 69 


28 


85 


8B 


A5 


8C 
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85 
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85 


92 


AO 


8E 


85 


E5 


C3A8 


: 85 


8C 


60 


AO 


00 


B9 


IB 


C5 


56 
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84 


84 


92 


85 
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E6 
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C8 


CO 
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DO 
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20 


58 
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AO 


AO 
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C3 
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A2 
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BD 
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E6 
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BD 
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E8 


9D 
A2 
EO 


A7 
00 
28 


96 

D4 
EE 
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Tis entering a program? Call 212-239-6089 (if 
r no answer after three rings, 212-239-0855) 


92 AHO 


Yt 





































I M PORTA MT! Metiers on white background are Bug Repellent line codes. Do not enter them! Pages 77 and 78 explain these codes 
I If 1 1 Ul 1 inil I . and provide other essential information on entering Ahoy! programs. Refer lo these pages before entering any programs! 



FROM PAGE 60 



• 10 SCNCLR : TRAP990 : COLOR . , 1 : C0L0R4 , 1 : GRAP 
HIC1,1:GRAPHIC.:CHAR.,12,10,"[BLUE]PLEAS 
E STAND BY!" CM 

•20 REST0RE1040:GOSUB1020:CHAR.,10,12,"PA 
TIENCE IS A VIRTUE." GJ 

•30 RESTORE1250:A=12288:B=12288+22*64-l:F 
ORC=ATOB : READD : POKEC , D : NEXT : CHAR .,3,14," 
'GOOD THINGS COME TO HE WHO WAITS [3"."]' 

GJ 

• 40 RESTORE3020 : A=3072 : B=3775 : FORC=ATOB : R 
EADD:POKEC,D:NEXT:POKE4590,35:POKE4591,5 
0:POKE4592,63:POKE4593,210:POKE4594,1:PO 
KE4599 , . : P0KE4600 , 5 : P0KE4601 , 4 : SYS3072 EO 

• 50 A=( 214*64 )+3*6 : B=214*64+3*6+23 : FORC=A 
TOB : POKEC, 255 : POKEC+64 , 255 : NEXT : A=216*64 
+1 : B=217*64-l : FORC= AT0BSTEP3 : POKEC , 255 : P 
OKEC+64, 255: NEXT GA 

• 60 P0KE53265 ,11: PRINTCHR$ ( 27 ) "M"CHR$ (11) 
CHR$(142)CHR$(147);:F0RX=.T039:A$=A$+CHR 
$(160):NEXT HK 

•70 COLORS, 7: F0RX=.T024:PRINTA$:NEXT:P0KE 
4599,.:P0KE54290,17:X=FRE(1) PI 

•80 PRINT"[HOME][4"tDOWN]"]"TAB(9)"[YELL0 
WJAHOY! MAGAZINE PRESENTS" CF 

•90 PRINT"[H0ME][8"[D0WN]"]"TAB(8)"[c 6j[ 
s N][s M][3" "][s 0][c Y][c Y][s P] [s 
][c Y][c Y] [c H] [c N] [s 0][c Y][c Y] 
[s 0][c Y][c Y][s P]" GD 

•100 PRINTTAB(7)"[s N] [s M] [s L][c P] 
[c P][s (3] [c H][3" "][s L][c P][s @] [s 
L][c P][c P] [s L][c P][c P][s @]" CC 

•110 PRINTTAB(6)"[s N][4"[c Y]"][s M] [c 
H] [s M] [s L][c P][c P] [c H] [c N] [s 
L][c P][c P] [c H] [s M][DOWN]" OE 

•120 PRINTrAB(5)"[3"[s M]"]"SPC(6)"[c 4]F 
OR THE C128"SPC(8)"[c 6][RVS0N][c *]" CD 

•130 PRINTrAB(6)"[RVS0N][3"[c *]"][RVS0FF 
][25"[c @]"][RVS0N] [c *]" IC 

•140 PRINTrAB(6)"[3"[sEP]"][25"[c Y]"][RV 
SON] [RVS0FF][sEP]" PM 

•150 PRINTrAB(5)"[3"[s N]"]"SPC(3)"[c 4]B 
Y CLEVE BLAKEM0RE"SPC(5)"[c 6][sEP][D0WN 
][D0WN]":PRINTrAB(7)"[3"[D0WN]"]PRESS FI 
RE BUTTON TO BEGIN" :P0KE53265, 27 MF 

•160 X=l:J=.:D0:P0KE8192+8*96+X,96:P0KE81 
92+8*96+J,.:X=X+l+(X=7)*8:J=J+l+(J=7)*8: 
LOOPUNTILJOYC 2 )>127: SCNCLR KK 

•170 RFJ1 INITIALIZE VARIABLES LB 

•180 CLR:DIM J,A,B,R,P,S,E,U,W,Z,G,I,V,T, 
H,X,P(8),B(7),N,L,K,SC,XC2),y(2),0X,0Y,A 
X,AY,DX(8),DY(8),JD,SP,SF,SM,UR,C$(10),B 



M(9),RD(9),IX(6),IY(6) AH 

•190 L=.:SC=.:P=2040:K=3:V=1:T=2:H=3:X=8: 

N=53269 : B=191 : JD=127 : SP=32 : SM=1024 : UR=40 
:SF=35 MP 

• 200 REST0RE800 : F0RJ= .T07 : B( J )=2 [ UPARROW ] 
J : NEXT : F0RJ=1T08 : READP( J) : NEXT : FOR J=1T01 
0:READC$(J):NEXT:F0RJ=1T08:READDX(J),DY( 

J) :NEXT:F0RJ=3T06:READIX( J) ,IY(J) :NEXT BP 

•210 B$="[D0WN][9"[LEFT]"]":F$="[6"#"]":P 
UDEF"0" LK 

•220 T$="[RVS0N][BLACK][7" "] [RVS0FF]":S$ 
="[c +][s C][s C][c +][D0WN][4"[LEFT]"][ 
c +][RVS0N][][RVS0FF][c +] [DOWN] [4"[LEFT 
]"][c +][RVS0N]()[RVS0FF][c +][D0WN][4"[ 
LEFT ] " ] [ 4" [ c +]"]": TR$="364436 [ 3"4" ] 9" MM 

•230 DEFFNA(X)=JAND15:DEFFNS(J)=B+A:DEFFN 
D(J)=(A-V)*45:DEFFNW(J)=(RND(V)*E)+G FJ 

•240 DEFFNM(J)=INT(RND(V)+U)*W+Z:DEFFNC(J 
)=(JANDH):DEFFNX(J)=RSPPOS(V,.):DEFFNY(J 
)=RSPPOS(V,V):DEFFNBCJ)=(B(A-V)ANDJ):DEF 
FNP(J)=PEEK(SM+X(J)+Y(J)*UR) KG 

•250 DEFFNPD(J)=PEEK(SM+X(.)+DX(A)+(DY(A) 
+YC.))*UR):DEFFNK(J)=(FNP(J)<>SPANDFNP(J 
)<>SF):DEFFNCP(J)=(X(.)=X(R)ANDY(.)=Y(R) 
):DEFFNSC(J)=36+(PEEK(2047)-210) OE 

•260 REM ENTRY POINT FOR NEW DUNGEON DG 

• 270 UL+V : IFL=1 1THENG0SUB900 : RUN60 : ELSEF 
0RA=VT09:BM(A)=253:NEXT:SCS="":IFL=5THEN 
K=K+V:CHAR. , . ,24,C$(L) :GOSUB840:S0UNDV,3 
0000 , UR , . , 5000 , 5000 , T : SLEEP3 PD 

•280 GOSUB750:F0RJ=.TOX:D0:X(.)=INT(RND(V 
)*30)+X:Y(.)=INT(RND(V)*21)+T:L00PWHILEF 
NP(.)<>SP:CHAR.,X(.),Y(,), "[YELLOW] [RVSO 
N]'":NEXT:PRINTCHR$(146) FH 

•290 F0RJ=VT0T:D0:X(J)=INT(RND(V)*30)+X:Y 
(J)=INT(RND(V)*21)+T:L00PWHILEFNP(J)<>SP 
:CHAR.,X(J),Y(J),"[BLACK]*":NEXT:X(.)=T: 
Y(.)=T LK 

•300 CHAR.,X(.),Y(.),"[GREEN]#":CHAR.,X(V 
),Y(V),"[RED]*":CHAR.,X(T),y(T),"[RED]*" 
:P0KE4599,V:P0KE54290,65 IC 

•310 REM DUNGEON OVERVIEW LOOP GI 

•320 R=V:DO:OX=X( . ) :OY=Y( . ) : J=JOY(T) : A=FN 
A( . ) :IFATHENX( . )=X( . )+DX(A) : Y( .)=¥(. )+DY 
(A) : IFFNP( . )=SPTHENCHAR. ,X( . ) ,Y( . ) ,"[GRE 
EN]#":CHAR.,0X,0Y," ":ELSEX(.)=OX:Y( .)=0 
Y LH 

•330 AX=X(R):X(R)=X(R)+(X(R)<X(.))*-V+(X( 
R)>X(.))*V:IFFNK(R)THENX(R)=AX LH 

•340 AY=Y(R):YCR)=Y(R)+(Y(R)<Y(.))*-V+(Y( 
R)>Y(.))*V:IFFNK(R)THENY(R)=AY PJ 

•350 CHAR.,X(R),Y(R),"[RED]*":IFAX<>X(R)0 
RAY<>Y(R)THENCHAR.,AX,AY," " AF 

•360 IFFNCP(.)THENEXIT:ELSER=H-R HO 

•370 LOOPUNTILFNPD(.)>JD EN 



AHOY! 93 



• 380 IFFNCP( . )THENFORA= .TOX : FOR J=VTOX : SOU 
NDT,P*X,V:C0L0R5,J:CHAR.,X(.),Y(.),"*":N 
EXTJ,A:K=K-V:CHAR.,32+K*T,24," ":IFKTHEN 
GOSUB730 : GOTO290 : ELSEIFK= . THENRUN60 MH 

•390 IFFNPD( . )=167THENP0KESM+X( . )+DX(A)+( 
DY(A)+Y(,))*UR,SP:SC=SC+L*50:S0UNDV,P*X* 
T,H,.,B.P*X,.:CHAR.,6,24,"[c 8]":PRINTUS 
INGF$;SC:GOT0320 II 

•400 IFFNPD(.)=155ORFNPD(.)=157THEN270 PK 

•410 RN=FNPD(.)-176:A$="[s +]":POKE53265, 
11:FAST:GOSUB830 JH 

■420 ONRD(RN)GOSUB430,440,450,460:GOT0470 AN 

•430 P0KE2046,214:M0VSPR7,160,38:J=170:A= 
73: RETURN IB 

•440 POKE2046.216:MOVSPR7,8,124:J=45:A=13 
2 : RETURN LC 

•450 POKE2046,216:MOVSPR7,312,124:J=295:A 
=132: RETURN DD 

•460 POKE2046,214:MOVSPR7,160,214:J=170:A 
=200: RETURN GI 

•470 SPRITE7, . ,V, . ,V,V, . :SPRITEV, . ,6, . , . , 
. , . :MOVSPRV , . # . : MOVSPRV , J , A : POKE2040 , 192 
: R=V : SPRITET , . , 8 : P0KE204 1 , 206 : SPRITEX , . , 
V, :M0VSPRX,173,140 HB 

• 480 FOR J=HT06 : MOVSPR J , . # . : SPRITEJ , . , RN+V 
;MOVSPRJ,IX( J) ,IY( J) :NEXT HK 

•490 IFRN>6THENONRN-6GOT0520,530,550 JF 

•500 IF(RNANDH)<HTHENA=((RNANDH)*T)+200:E 
LSEA=200 GO 

•510 P0KE4600,4:P0KE4601,4:U=X:W=45:Z=. :E 
=4:G=H:I=.005:S-(L<=H)*-T+(L>HANDL<=5)*- 
H+(L>5)*-4 : FORJ= .T04 : P0KE2041+ J , A : NEXT : P 
OKE4595,A:GOT0560 PG 

• 520 P0KE4601 ,T : E=T : G=H : 1= . : S= , : F0RJ=HT04 
:SPRITEJ,,12,,V,.:P0KE2039+J,215:NEXT:F0 
R J=5T06: SPRITEJ, ,12, , . ,V:P0KE2039+J,216: 
NEXT : P0KE4595 ,215: P0KE4600 , 80 : G0T0560 HA 

•530 P0KE4601,T:E=T:G=H:U=T:W=180:Z=90:I= 
. : S=5 : F0RJ=HT04 : SPRITEJ , , 10 , V , V , . : P0KE20 
39+J, 214 tNEXT: FOR J=5T06: SPRITEJ,, 10, V,., 
V:POKE2039+J,216:NEXT:POKE4595,214 CJ 

•540 GOT0560 EF 

•550 P0KE4601,T:E=T:G=5:U=T:W=180:Z=.:I=. 
: S=5 : F0RJ=HT04 : SPRITEJ , , 1 3 , V , V , . : P0KE203 
9+J, 214: NEXT: FOR J=5T06: SPRITEJ,, 13, V,.,V 
:P0KE2039+J, 216 : NEXT :P0KE4595, 214 AF 

•560 F0RA=.T010:J=BUMP(V);NEXT:P0KE53248+ 
21 ,BM(RN) :R=V:P0KE4594, . :P0KE4599,T GE 

• 570 IF(RNANDH)<HTHENP0KE2047,210+CRNANDH 
):ELSEP0KE2047,210 KG 

•580 SL0W:P0KE53265,27 AA 

•590 REM MAIN LOOP DG 

• 600 DO : J=JOY (T) : A=FNA ( . ) : IFATHENR=A : POKE 
P,FNS(.) OK 

•610 IFAANDAOJTHENSPRITET, . :MOVSPRT, .#. : 
MOVSPRT,FNX( . ) ,FNY( . ) :M0VSPRT,20;FND( . ) : 
MOVSPRT,FND(.)#X:POKEP+V,P(R):SPRITET,V: 
SOUNDV,P*X,SP,V,P*H,B*H,H LN 
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•620 MOVSPRFNW( . ) ,FNM( .)#S:S=S+I: J=BUMP(V 
) : LOOPUNTILFNCC J ) : ONFNC( J)GOTO660 , 630, 60 
LH 

• 630 IFRN>H+HTHEN600 : ELSEFORA=HTOX-T : IFFN 
B(J)THENSPRITET, . :SOUNDT,P*X,75, . ,P*T,P, 
T:GOSUB700 KB 

•640 NEXT AE 

•650 J=BUMP(V):J=BUMP(V):G0T0600 LC 
•660 IFJ=B(7)+VTHENGOSUB710;G0T0650:ELSEI 
FJANDB(7)THEN650 NL 

•670 IFJ=B(6)+VTHENBM(RN)=PEEK(N):SCNCLR: 
POKEN , . : A$=" [ c + ] " : GOSUB750 : G0T0300 : ELSE 
IFJANDB(6)THEN650 DB 

•680 P0KE4594, V: MOVSPRV,. #.:K=K-V: CHAR., 3 
2+K*T, 24, " ": SOUNDT, 5000, 150, T , , 100, V :P0 
KEP,213:F0RD=1T03:F0RJ=1T016:SPRITEV,V,J 
:F0RA=.T020:NEXTA,J,D:BM(RN)=PEEK(N) HK 
•690 P0KEN,.:IFKTHEN420:ELSERUN60 BK 
•700 SC=SC+L*K/J:CHAR.,6,24,"[c 8]": PRINT 
USINGF$ ; SC : F0RH=VT05 : F0RT=VT016 : SPRITEA , 
V, T: NEXT: NEXT :T=2:H=3:SPRITEA,.: RETURN EA 
•710 SC=SC+L*ir/jO:CHAR.,6,24,"[c 8]":PRIN 
TUSINGF$;SC: SOUNDT, P*T, 50, V,B,B,T:P0KEN, 
PEEK(N)ANDJD:SC$=SC$+CHR$(FNSC( .)) :CHAR. 
, 1 6, 24, "[ YELLOW ]"+SC$: RETURN LA 

•720 REM ERASE OLD CHARACTER POSITIONS PA 
•730 FORJ=.TOT:CHAR.,X(J),Y(J)," ":NEXT:R 
ETURN BP 

•740 REM DUNGEON CREATOR KC 

•750 P0KE53265,ll:FAST:A$="[c +]":G0SUB83 
: ONLGOSUB770 , 780 , 790 , 800 , 770 , 780 , 790 , 80 
0.790,810:CHAR.,T,5,S$:IFVAL(MID$(TR$,L, 
V))=LEN(SC$)THENCHAR.,H,5," " LG 
•760 P0KE5326 5, 27: SLOW: RETURN GJ 

• 770 D=H : RN=4 : FORJ=VTOH : D=D+V+( D=4)*4 : RN= 
RN+V : CHAR . , J*10 , J*4+T : GOSUB870 : NEXTJ : RET 
URN HE 

• 780 D= . : RN= . : FORJ=VTOH : FORA=VTOT : D=D+V+C 
D=4)*4 : RN=RN+V : CHAR . , J*10-T, A*6+T : G0SUB8 
70:NEXTA,J:RETURN BM 

• 790 D=T : RN=7 : FORJ=VTOT: FORA=VTOT : D=D+V+( 
D=4)*4:RN=RN+V+(RN=9)*9:CHAR.,J*12,A*6+T 
: GOSUB870 : NEXTA , J : RETURN CN 

• 800 D= V : RN=4 : FOR J= VT04 : D=D+ V+ ( D=4 ) *4 : RN= 
RN+V : CHAR . , 40-J*10 , J*4+T : GOSUB870 : NEXTJ : 
RETURN NM 

•810 D=.:RN=.:FORJ=.T02:FORA=.T02:D=D+V+( 
D=4)*4 : RN=RN+V : CHAR . , J*10+7 , A*7+4 : G0SUB8 
70: NEXTA, J: RETURN NJ 

•820 REM PRINT BORDER WITH A$ HG 

•830 PRINTCHR$(147);C$(L); :FORJ=.T079:PRI 
NTA$;:NEXT:F0RJ=.T019:PRINTA$A$TAB(38)A$ 
A$;:NEXT:FORJ=.T079:PRINTA$;:NEXT JM 

•840 PRINT"SC0RE:[6"0"][3" "][[9" "]] [c 

8]MEN [GREEN]"; :F0RJ=VT0K:PRINT"# ";:NE 

XT:CHAR.,12,24,"[WHITE]":PRINTL:CHAR.,16 

,24."[YELL0W]"+SC$:CHAR.,6,24,"[c 8]":PR 

INTUSINGF$;SC: RETURN HH 




•850 REM PRINT ROOM W/DOOR AT CURRENT LOG 
ATION DJ 

•860 REM D=DOOR#,RN=ROOM#,C$(L)=COLOR CF 
•870 F0RT=VT04;A$(T)="[c +]":NEXT:T=2:A$( 
D)=CHR$(18)+CHR$(144)+CHR$(48+RN)+CHR$(1 
^6) BD 

•880 PRINTC$(L);"[4"[c +]"]"A$(1);C$(L) ;" 
[4"[c +]"]";B$;"[c +]"T$;C$(L);"[c +]";B 
$:A$(2);T$;C$(L);A$(3);C$(L);B$;"[c +]"T 
$;C$(L);"[c +]";B$;"[4"[c +]"]"A$(4);C$( 
L);"[4"[c +]"]":RKRN)=D:RETURN MK 
•890 REM VICTORY DL 

• 900 SOUNDl , 25000 , 300 , 1 , 300 , 3000 , 2 : PRINT" 
[HOME] [HOME] [CLEAR]"TAB(4)"[8"[ DOWN]" ][Y 
ELL0W]Y0U HAVE CONQUERED THE DUNGE0N[3"! 
"]":SLEEP6:RETURN EB 

•910 REM ARROW POINTERS BD 

• 920 DATA 206 , 207 , 208 , 209 , 206 , 207 , 208 , 209 JH 
•930 REM LEVEL COLORS ID 

•940 DATA "[BLUE]","[c 2]"."[c 4]","[c 5] 
","[CYAN]"."[c 2]","[c l]","[RED]","[c 7 
]", "[PURPLE]" HN 

•950 REM JOYSTICK X&Y ADJUSTMENT DELTAS GO 
•960 DATA 0,-l.l,-l,l.,l,l,,l,-l,l,-l,,-l 

,-1 MF 

•970 REM INITIAL SPRITE POSITIONS JI 
•980 REM ERROR HANDLING EF 

•990 SL0W:P0KE53265,27:PRINTERR$(ER);" IN 

LINE ";EL:END ED 

•1000 DATA 162.112,162,164,142,127,206,12 
7 IJ 

•1010 REM REDEFINED CHARACTERS KD 

•1020 BANK15:SUM=0:F0RI=2816T02869:READJ: 
SUM=SUM+J:P0KEI,J:NEXT:IFSUM<>7491THENPR 
INT"ERR0R I " : END : ELSES YS2816 : P0KE2604 , PEE 
K(2604)AND2400R8 DA 

• 1030 READA:IFA=-1THENRETURN: ELSEF0RI=.T0 
7:READB:P0KE8192+A*8+I,B:NEXT:G0T01030 EL 
•1040 DATA 169,, 133, 250, 133, 252, 169, 208 HJ 
•1050 DATA 133,251,169,32,133,253,169.252 HA 
•1060 DATA 141,185,2,169,16,141,54,11 PA 
•1070 DATA 160,, 169, 250, 162, 14, 32, 116 AL 
•1080 DATA 255, 162,, 32, 119, 255, 200, 208 OJ 
•1090 DATA 241,206,54,11,240,7,230,251 DC 
•1100 DATA 230,253,76,26,11,96 U 

•1110 REM CHARACTER DATA JX 

•1120 DATA35, 60, 126, 219, 255, 255, 219, 102, 6 
f> FL 

•1130 DATA36, 126, 102,90, 126,60, 24,24, 126 DK 
•1140 DATA37,,56,16,56,68,68,56,. KC 
•1150 DATA38,. 63, 67, 253, 133, 253, 182, 252 NF 
•1160 DATA167,36,129,60,126,213,126,60,24 IP 
•1170 DATA42,60,90,36,126,153,189,165,102 0J 
•1180 DATA91,, 249, 249, 249, 249,, 191, 191 GP 
•1190 DATA102,63,,,243,243,,,063 KN 
•1200 DATA155, 255. 128, 191, 128, 159, 128, 143 
,128 Itj 

•1210 DATA157, 255, 1,253, 1,249, 1,241,1 CP 



• 1220 DATA168 , 135 . 128, 131 , 128, 129, 128,128 

,255 FN 
•1230 DATA169, 225, 1,193, 1,129, 1,1, 255,-1 AE 

•1240 REM SPRITE DATA FF 

•1250 DATA0,8,,,28,,,62 NF 

•1260 DATA0,,8,,,8,,. lA 

•1270 DATA127,, 1,255. 192, 1,255, 192 KP 

•1280 DATA3, 190, 224, 3, 156, 224, 3, 255 CF 

•1290 DATA224,3,255.224,3,190,224,1 IH 

•1300 DATA193, 192, 1,255, 192, ,127,. GK 

•1310 DATAO,,,,,,,. VG 

•1320 DATAO,,,,,,,. eA 

•1330 DATAO ,. DC 

•1340 DATA60,,,28,,,28,. DL 

•1350 DATA127, 36, 1,255, 192. 1,255, 192 FK 

•1360 DATA3, 190, 224, 3, 156, 224, 3, 255 BF 

•1370 DATA224,3,255,224,3,190,224,1 PH 

•1380 DATA193, 192, 1,255, 192,, 127,. DK 

•1390 DATAO,,,,,,.. KG 

•1400 DATAO,,,,,,,. JA 

•1410 DATAO,,,,,,,. IC 

•1420 DATAO,.,,,,,. JM 

•1430 DATA127,, 1,255, 192, 1,255, 192 NI 

•1440 DATA3, 190. 228, 3, 156, 230, 3, 255 KK 

•1450 DATA255,3,255,230,3,190,228,1 EC 

•1460 DATA193, 192, 1,255, 192,, 127,. AK 

•1470 DATAO, pg 

•1480 DATAO,,,,,,,. OA 

•1490 DATAO,,,,.,,. NC 

•1500 DATAO,,,,,,,. OM 

•1510 DATA127., 1.255, 192, 1,255, 192 CI 

•1520 DATA3, 190, 224, 3, 156, 224, 3, 255 LF 

•1530 DATA224,3.255,224,3,190.224,1 JH 

•1540 DATA193. 192, 1,255, 192,, 127, 36 FE 

•1550 DATAO,, 28,,, 28,,. MP 

•1560 DATA60.,,,,,,. FG 

•1570 DATAO,,,,,,,. EP 

•1580 DATAO,,,,,,,. pj 

•1590 DATA127., 1,255, 192, 1,255. 192 MJ 

•1600 DATA3, 190, 224, 3, 156, 224, 3, 255 IK 

•1610 DATA224, 3, 255, 224, 3, 190,224,1 NA 

•1620 DATA193, 192, 1,255, 192, ,127,. ND 

•1630 DATAO, 8,,, 8,,, 62 BF 

•1640 DATAO,, 28,,, 8,,. CH 

•1650 DATAO,,,,,,,. JP 

•1660 DATAO,,,,,,,. KJ 

•1670 DATA127,, 1,255, 192, 1,255, 192 NJ 

•1680 DATA3. 190, 224, 3, 156,224,3,255 PK 

•1690 DATA224,3,255,224,3.190,224,1 I A 

•1700 DATA193, 192, 1,255, 192, 18, 127,. NB 

•1710 DATA28,,,28,,,30.. MH 

•1720 DATAO,,,,,,,. MN 

•1730 DATAO,,,.,,,. OP 

•1740 DATAO,,,.,,,. Pj 

•1750 DATA127,. 1,255, 192, 1.255, 192 GJ 
•1760 DATA19, 190,224,51,156,224,127,255 HJ 

•1770 DATA224,51,255,224,19,190,224,1 MF 

•1780 DATA193, 192, 1,255, 192,, 127,. HD 
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•1790 DATAO,,,,,,,. AD '2370 

•1800 DATAO,,,,,,,. BK '2380 

•1810 DATA0,,,,,,30,, TO '2390 

•1820 DAT AO, 28,,, 28,,, 18 BC '2400 

•1830 DATA127,, 1,255, 192, 1,255, 192 KC -2410 

•1840 DATA3, 190, 224, 3, 156, 224, 3, 255 GP -2420 

•1850 DATA224,3,255,224,3,190,224,1 PJ -2430 

•1860 DATA193, 192, 1,255, 192,, 127,. GM -2440 

•1870 DATAO,,,,,,,. HI -2450 

•1880 DATAO,.,,,,,. GK -2460 

•1890 DATAO,,,,,,,. GE -2470 

• 1900 DATAO , , 60 , , , 90 , , . EH • 2480 

•1910 DATA189,,,153,,,129,. ED ^2490 

•1920 DATAO, 129,,, 66,,, 36 OE ^2500 

•1930 DATAO, 4, 18,, 2, 9,, 3 MK -2510 

•1940 DATA4,12B,7,2,64,14,1,32 LP '2520 

•1950 DATAl 5, 129, 32, 7, 193, 32, 1,255 OF '2530 

•1960 DATA32,,126,64,,63,128,. EI '2540 

•1970 DATAO,,,,,,,. LE -2550 

•1980 DATAO,, 30,,, 45,,. LI -2560 

•1990 DATA94,128,,76,128,,64,128 HM '2570 

•2000 DATAO, 64, 128,, 33,,, 18 JE •2580 

•2010 DATAO, 64, 9,, 128, 4, 128, 112 IL -2590 

•2020 DATA4, 128, 24,4, 128, 12,4, 128 FP -2600 

•2030 DATA28, 4, 128,15,12,128,7,255 BO -2610 

•2040 DATAl 28, 1,255,,,,,. EN -2620 

•2050 DATAO,,,,,,,. CB -2630 

•2060 DATAO, 16,,, 80,,, 80 AF ^2640 

•2070 DATAO, 8, 88,, 26, 116,, 46 CI -2650 

•2080 DATA82,60,74,89,255,154,95,255 NC -2660 

•2090 DATA234,91,125,218,91,17,250,25 HK -2670 

•2ir/j DATA255, 154,8, 127, 18,8,99, 18 BN -2680 

•2110 DATA8,34,16,,20,16,,. OK '2690 

•2120 DATAO,,,,,,,. IH -2700 

•2130 DATAO,,,,,,,. HB •2710 

•2140 DATAO,,, 8,,, 10, 16 CB -2720 

•2150 DATAO, 10, 88,, 26, 116,, 46 PH '2730 

•2160 DATA82,60,74,89,255,154,87,255 GH ^2740 

•2170 DATA250,91,190.218,95,136,218,89 JH '2750 

•2180 DATA255,152,72,126,16,72,195,16 NE ^2760 

•2190 DATA8,129,16,8,66,,,. KG '2770 

•2200 DATAO,,,,,,,. NH -2780 

•2210 DATA3, 255,, 7, 255, 128, 13, 240 DH -2790 

•2220 DATA64,,245,64,,240,70,. DJ -2800 

•2230 DATA240,73,,120,137,,125,153 GI -2810 

•2240 DATA224,255,189,153,255,254,159,255 BL -2820 

•2250 DATA248,159,255,240,191,255,224,255HK -2830 

•2260 DATA255, 192, 65, 255, 128,, 255, 192 PE -2840 

•2270 DATAO, 127, 194,, 127, 195,, 63 LO -2850 

•2280 DATA227,,7,255,,3,254,. EG -2860 

•2290 DATA3, 255,, 7, 255, 128, 13, 240 CH -2870 

•2300 DATA64,,245,64,,240,64,64 IC -2880 

•2310 DATA240,64,160,120,142,144,125,153 DM .2890 

•2320 DATAl 52, 255, 185, 159, 255, 249, 191, 255 NC -2900 

•2330 DATA253,127,255,254,63,255,248,31 AO '2910 

•2340 DATA255, 192, 1,255, 128,, 255, 192 LN .2920 

•2350 DATAO, 127, 192, ,127, 196, ,63 MK -2930 

•2360 DATA198,,15,254,,3,252,. LL '2940 
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•2950 DATA127, ,1,255,192,1,255,192 

• 2960 DATA3 , 1 56 , 224 , 3 , 190 , 224 , 3 . 255 
•2970 DATA224, 3, 255, 224, 3, 193,224,1 
•2980 DATA190, 192, 1,255, 192,, 127,. 
•2990 DATAO.,,,.,,. 

•3000 DATAO,,,,,,,. 
•3010 REM INTERRUPT DATA 
•3020 DATA120,169,25,141,20,3 
•3030 DATA169, 12, 141,21,3,173 
•3040 DATA248, 17, 133, 251, 169,1 
•3050 DATAl 33, 252, 32, 157, 13,88 
•3060 DATA96,173,242,17,240,3 
•3070 DATA76,252,12,198,251,208 
•3080 DATA27.173,248,17,133,251 
•3090 DATA165,252,24,109,243,17 
•3100 DATA174,249,17,157,249,7 
•3110 DATA202, 208, 250, 169, 1,56 
•3120 DATA229, 252, 133, 252, 173,0 
•3130 DATA220,162,0,41,15,133 
•3140 DATA253,169,15,56,229,253 
•3150 DATA201, 4, 208, 19,222,214 
•3160 DATA17,208,11,169,1,77 
•3170 DATA230,17,141,230,17,222 
•3180 DATA214,17,76,252,12,201 
•3190 DATA8,208,19,254,214,17 

• 3200 DATA208 , 1 1 , 169 , 1 , 77 , 230 
•3210 DATA17,141,230,17,254,214 
•3220 DATA17,76,252,12,201,1 
•3230 DATA208,7,232,222,214,17 
•3240 DATA 76, 252, 12, 201, 2, 208 
•3250 DATA7,232,254,214,17,76 
•3260 DATA252,12,201,5,208,23 
•3270 DATA222,214,17,208,11,169 
•3280 DATA 1,77, 230, 17, 141, 230 
•3290 DATA17, 222, 214, 17,232,222 
•3300 DATA214,17,76,252,12,201 
•3310 DATA6,208,23,222,214,17 
•3320 DATA208,1 1,169, 1,77, 230 
•3330 DATA17,141,230,17,222,214 
•3340 DATA17, 232, 254, 214, 17,76 
•3350 DATA252,12,2Ol,9,208,23 
•3360 DATA254,214,17,208,11,169 
•3370 DATAl, 77, 230, 17, 141, 230 
•3380 DATA17,254,214,17,232,222 
•3390 DATA214,17,76,252,12.201 
•3400 DATA10,208,21,254,214,17 
•3410 DATA208, 12, 138, 169,1,77 
•3420 DATA230, 17, 141 ,230, 17, 254 
•3430 DATA214,17,232,254,214,17 
•3440 DATA162,5,142,244,17,173 
•3450 DATA244, 17, 10, 170,74, 168 
•3460 DATA185, 149, 13,45,230, 17 
•3470 DATA208,20,189,214,17,56 
•3480 DATA205,238,17,r76,ll,172 
•3490 DATA238, 17, 200, 152,157,214 
•3500 DATA17,76,117,13,138,74 
•3510 DATA168,185,149,13,45,230 
•3520 DATAl 7, 240, 32, 189,214,17 
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DATA56,205.239,17,144,23 

DATA172,239,17,136,152,157 

DATA214,17,173,244,17,201 

DATA 1,208, 8, 169, 253, 45 

DATA21, 208, 14 1,2 1,208, 232 

DATA189,214,17,56,205,240 

DATA17,176,11,172,240,17 

DATA200,152,157,214,17,76 

DATA117,13,189,214,17,56 

DATA205,241,17,144,23,172 

DATA241,17, 136, 152,157,214 

DATA17, 173, 244, 17, 201.1 

DATA208, 8, 169,253,45,21 

DATA208, 141 ,21,208, 206,244 

DATA17,48,3,76,1,13 

DATA32 , 196 , 13 . 238 , 46 , 208 

DATA76,101,250,1,2,4 

DATA8,16,32,64,128,162 

DATA24, 169, 0,157, 0,212 

DATA202 . 16 , 250 , 169 , 240 , 141 

DATA20,212,169,65,141,18 

DATA212,169,15,141,24,212 

DATA169, 0,141, 246, 17, 169 

DATA50,141,17,212,141.16 

DATA2 12, 96, 206, 245, 17,208 

DATA53, 169, 12,141,245, 17 

DATA173,246,17,174,247,17 

DATA56,221,11,14,144,5 

DATA169, 0,141, 246, 17, 174 

DATA247, 17,189,14,14,133 

DATA254 , 189 , 1 7 , 14 , 133 . 255 

DATA172,246,17,177,254,141 

DATA15,212,200,177,254,141 

DATA14 , 21 2 , 200 , 140 , 246 , 1 7 

DATA173,245,17,24,105,150 

DATA141,17,212,141,10,212 

DATA 96, 80, 44, 48, 20, 100 

DATA144,14,14,14,19,239 

DATA18, 209, 19,239, 18, 209 

DATA18, 209, 19,239, 18, 209 

DATA18, 209, 29,223, 29, 223 

DATA28,49,25,30,25,30 

DATA22,96,19,239,19,239 

DATA18, 209, 16,195,16,195 

DATA18,209,16,195,16,195 

DATA18,209,16,195,16,195 

DATA18,209,16,195,16,195 

DATA28,29,28,49,25,30 

DATA23,181,23,181,19,239 

DATA18, 209, 18,209, 16, 195 

DATA25,30,25,30,18,209 

DATA7,112,7,119,7,119 

DATA4,180,4,251,4,251 

DATA5,152,5,237,5,237 

DATA6,71,6,167,6,167 

DATA7,112,7,112,7,119 

DATA4,251,5,237,4,180 

DATA7,112, 5,152, 5,237 



GE 
EA 

HD 

FB 

U 

CH 

GH 

GG 

IG 

DP 

KH 

MH 

IG 

PB 

JH 

PJ 

CO 

GI 

10 

GE 

10 

JP 

FD 

HM 

LI 

HH 

U 

PD 

GJ 

CL 

DA 

NH 

OC 

AD 

CG 

JH 

EN 

GF 

00 

MI 

AM 

GF 

MI 

DG 

FI 

OK 

PM 

HC 

CK 

EK 

PF 

ND 

JP 

IB 

FO 

JI 

OA 

KG 
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•4110 DATA7,119,25,30,21,31 
•4120 DATA18,209,25,30,21,31 
•4130 DATA18,209.25,30,21,31 
•4140 DATA18,209,25,30,21,31 



OG -4150 DATA18,209,25,30,28,49 

GN '4160 DATA29,223,28,49,22,96 

NP '4170 DATA28,49,18,209,25,30 

JB -4180 DATA21,31,18,209,25,30,25,30 



HB 
FI 
GL 
CO 



TIPSAtlCri 



]-: 



Continued from page 52 

It's super easy to check the bytes free, and you can do 
it as often as you like. With the cursor resting on a blank 
line, press the back arrow key ( -^ ). then press RE- 
TURN. Bingo... there they are. -Buck Childress 

Salem, OR 

•10 PRINTCHR$C 147) "LOADING DATA"; : FOR J=70 

0T0753 : READA : IFA<OORA>255THEN30 
• 20 POKEJ , A : X=X+ A : PRINT" . " ; : NEXTJ : PRINT : P 

RINT:IFX=5958THEN40 
•30 PRINT"ERROR IN DATA[3"."]":END 
•40 PRINT"THE DATA IS LOADED/': PRINT 
•50 PRINT"SYS 700 TO ACTIVATE AND DEACTIV 

ATE[3"."]":END 
•60 DATA169,208, 162,2,236, 1,3,208,4,169,1 

39,162 
•70 DATA227, 141, 0,3, 142, 1,3, 96, 173, 0,2, 20 

1 
•80 DATA95, 240, 3, 76, 139, 227, 206, 0,2, 164, 5 

2,165 
•90 DATA51, 56, 229, 49, 176, 1,136, 170, 152, 56 

,229,50 
•lOTj DATA32,205,189,76,116,164 

C-128 CENTER AND RIGHT JUSTIFY 

You're probably feeling gypped out of a good command 
if you've tried to use the C-128's PRINT USING command 
to center strings on the screen. The documentation includ- 
ed with the System Guide is incorrect, depriving you of 
the use of a much needed command. 

You'll have to define a control string, F$, with 40 amper- 
sands to properly control this command, and suffix it with 
the appropriate control character, either "*=" for centering 
or ">" for right justification. The control string lets the 
BASIC interpreter know what size of field you want your 
string to be centered in, and by changing the size of F$ 
you can also format text inside windows. 

I am currently working on a quality word processor in 



BASIC 7.0, and encountered a great deal of frustration be- 
fore I figured out through trial and error how this com- 
mand worked. It was enormously useful in formatting text 
on the screen from the word processor. — Cleve Blakemore 

Richmond, VA 



•10 REM USE "=" TO CENTER STRING 

•20 REM USE ">" TO RIGHT JUSTIFY 

•30 PRINTCHR$(147) 

•40 F0RX=1T039:F$=F$+"#":NEXT 

•50 A$="CENTERED STRING" 

•60 PRINTUSINGF$+"=";A$ 

•70 A$="RIGHT JUSTIFIED" 

•80 PRINTUSINGF$+">";A$ 

•90 A$="LEFT JUSTIFIED" 

•100 PRINT" [UP]" ;A$ 

BRANCH CALC 

The BASIC language of the Commodore 64 is reason- 
ably good. But there is still room for improvement. For 
example, if you've seen BASIC programs for other languag- 
es that offer calculated GOTOs and GOSUBs, chances are 
the program was much easier to understand. A GOSUB 
DRAWSCREEN is definitely preferable to GOSUB 13491. 
The 64 will possess this ability when you load and run 
Brunch Calc. 

Lines 120 and 130 transfer Kemal and BASIC ROM to 
RAM and protect it against RUN STOP/RESTORE. Since 
this takes some time, it you've already used a program that 
does this, RUN 140 to speed things up. -Shawn K. Smith 

Bronx, NY 

•100 REM* BRANCH CALC SHAWN K. SMITH 

•110 REM "CALCULATED GOTOS AND GOSUBS" 

• 120 B=40960:K=57344 :FORD=OT08191 : POKEB+D 
,PEEK(B+D):POKEK-i-D,PEEK(K+D):NEXT 

• 130 POKEl , 53 : P0KE64982 , 53 

• 140 S=48981 : F0RD=ST0S+6 : READY : POKED , Y 
•150 NEXT:H=INT(S/256):P0KE43170,H 

• 160 P0KE43169 , S-H*256 : D=21 : L00P=180 
•170 DATA 032,138,173,076,247,183,234 
•180 D=D-1:PRINT"0K!":IFDTHEN GOTO LOOP 
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ARCADE REALISM HOME! 
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ECHELON 



AGTUA; AMIGA GSAfHlES 



3-D SPACE FLIGHT SIMULATOR 



ECHELON ... A top secret milrtary tacilrty where a 
few higtily skilled pilots will be trained to operate the 
21st Century's most awesome combat and 
exploration vehicle, the Lockheed C-1 04 Tomahawk. 
The C-1 04 spacecraft has the latest in advanced 
instrumentation, weaponry, and control systems. 



ACTUAL C-64 SCREENS 








'^^tk 




.-^ 


■*» 



^ifflp 



Available Now/ For C-64/128. 

EntrancBd wersions coming soon lor APPLE. IBM, AMIGA, ATARI ST. 
and DOMMODQflE 12B. 




ITS IMPRESSIVE ATTRIBUTES INCLUDE 

- 4 Olfferenl 'State ol the Art" Weapons Systems 

■ Bi-Direclional Transporter Unit 

- Unmanned RPV (Remote Piloted Vetvicle) Conlrol 

■ Anti-Gravity Braking and Hovsring 

- Forward and Reyierse Thrusters 
• Twin 3-D Screens 

- Real-Time infrared Vector Grapliics 

- Non Real-Time CompLter Enhanced Graphics 

- Computer Assisted Control Systems 

- Computer Intormatior Data Link 

- On Board Sub- Atomic Analyzer/ Oecocter 



is 3 true 3-D space llighl simulator thai puis you al Ihe 
contrDls of Ihc 0-104 Tomahawk and in Ihe heart ol ihe aclion. you'll 
experience the encitemenl and thrill ol real spacetlighl llirough 
superb three dimensional graphics. But, belore you go exploring on 
your own, it would be wise 10 go through Ihe carelully designed 
training simulators. These rigorous courses will develop your skills in 
manuevering the spacecratl. accurate seletlion and use ol weapons, 
conlrol ol RPV s. object relrieval and retuel and [locking procedures. 
Developing these skills are essential to your survival when 
encountering hostile enemy spacecraft or exploring unknown terrain. 

is available now and offers you the Simulation Adventure 
ol a Ufetime lor only S39.95!! 




II you can't find our products at your local dealer, you can order 
direct For mail orders, enclose check or money wder, plus 



SI .00 shipping and handling, and specity machine version 
desired. Order by ptione on VISA, MasterCard or C.0.0, by 
calling TOLL FREE (S00| B24-2S49. 
ACCESS SQFTWnflE. INC ?S6I So 15MW Wood Crijss, UT 84087 
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inverted, color may be si 
image may be flipped hor 
vertically, and the bit m 
scrolled in single pixel inci 
map data which scrolls of 
is lost and die color data do 
along with the bit map. Thf 
also be converted to the < 
map format even when the 
file format is the same as t 
The original image may be 
restored after any number 
terations, with the exceptic 
noted above. Interesting 
there was no way to load ii 
form some bit map manipi 
resave die file in the sam 
the original. Conversion to 
mat is always required. 

Overall the Graphics Tn 
a very useful tool for a 
works widi C-64 graphic 
file formats. Many, if not 
criticisms will most likely t 
of in the next update of t\ 
It seems that many of the 
of Complete Data Automat 
graduates from the selec 
C-64 copy program pp 
Those of you who rememb 
such as Di-Sector will recc 
of the names in the ac< 
credits. In feet, more th 
amount of the C-64 hack 
found its way into the pro| 
brief documentation. 

Complete Data Auton 
Box 1052, Yreka, CA 96< 
916-842-3431). -Mortc 

CELEBRITY COOKBOOK 
Merrill Ward 
Comniodore 64 
Disk; $29.99 

Here's a tasty recipe for 
terist with a hunger for hig 
cacies. Take one Commoc 
add Celebrity Cookbook h 
voila! One hearty appetite 
emerge! The program mij 
you into a master chef, but 
vide alternatives to Wedne 
loaf and mashed potatoes, 
it's designed for ease of i 
computerists. Simple onst 
tions, single-key commani 
printouts of the recipes n^ 
rity Cookbook a snap to i 

The program features ' 
recipes collected from sue 
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